# NOT RUN {
library(dplyr)
library(meantables)
data(mtcars)
# Overall mean table with defaults
mtcars %>%
mean_table(mpg)
# A tibble: 1 x 9
response_var n mean sd sem lcl ucl min max
<chr> <int> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl>
1 mpg 32 20.1 6.03 1.07 17.9 22.3 10.4 33.9
# Grouped means table with defaults
mtcars %>%
group_by(cyl) %>%
mean_table(mpg)
# A tibble: 3 x 11
response_var group_var group_cat n mean sd sem lcl ucl min max
<chr> <chr> <dbl> <int> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl>
1 mpg cyl 4 11 26.7 4.51 1.36 23.6 29.7 21.4 33.9
2 mpg cyl 6 7 19.7 1.45 0.549 18.4 21.1 17.8 21.4
3 mpg cyl 8 14 15.1 2.56 0.684 13.6 16.6 10.4 19.2
# }
Run the code above in your browser using DataLab