ggpubr包实现均值水平比较检验与显著性标记图示
主要介绍ggpubr包。
library(ggpubr)
head(ToothGrowth)
table(ToothGrowth$supp)
table(ToothGrowth$dose)
table(ToothGrowth$supp, ToothGrowth$dose)
compare_means(len ~ supp, data = ToothGrowth)
compare_means(len ~ supp, data = ToothGrowth, group.by = "dose")
compare_means(len ~ supp, data = ToothGrowth, ref.group = "VC")
compare_means(len ~ supp, data = ToothGrowth, ref.group = ".all.")
compare_means(len ~ dose, data = ToothGrowth)
compare_means(len ~ dose, data = ToothGrowth, ref.group = ".all.")
ggboxplot(ToothGrowth,
x = "supp", y = "len",
fill = "supp",
add = "jitter") +