# NOT RUN {
boxplot(score ~ class, data = Statisti, col = "violet")
tapply(Statisti$score, Statisti$class, summary, na.rm = TRUE)
# }
# NOT RUN {
library(dplyr)
dplyr::group_by(Statisti, class) %>%
summarize(Mean = mean(score, na.rm = TRUE),
Median = median(score, na.rm = TRUE),
SD = sd(score, na.rm = TRUE),
RS = IQR(score, na.rm = TRUE))
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab