#' @importFrom dplyr %>% group_by summarise n do transmute_at NULL #' @export plot.tbl_basic <- function(x,...){ plot_tbl_basic(x,...) }