R语言菜鸟求助。
代码如下,效果如图。
alcomp <- list(c("MA3","AN4"),c("MA3","OA1"))
alphabp <- ggplot(alphalong, aes(SampleID, Alpha_diversity, color = Index)) +
geom_boxplot() +
facet_wrap(~Index) +
geom_signif(comparisons = alcomp, step_increase = 0.1, map_signif_level = F,test = t.test) +
geom_jitter(binaxis = "y", position = position_jitter(0.1), stackdir = "center") +
theme_light()
使用ggplot2进行分面后,使用ggsignif包进行组间差异并绘图,发现只有一个分面有检验结果。
如何能使每个分面都有组间差异检验的结果呢。。。
附件列表