# NOT RUN {
library(metan)
df <-
data_ge2 %>%
split_factors(GEN) %>%
desc_stat(EP, EL, PH, CL,
stats = c('mean, CI.mean, SE.mean, var.amo, CV'),
verbose = FALSE)
print(df, n = 15)
desc_wider(df, PH)
# }
Run the code above in your browser using DataLab