当你的数据成三列,即“treatment、编号组、数据”时,想对不同treatment的编号组两两对比,即分组画图
#需要1个包
library(ggplot2)
没有下载在Library之前要install.package(’...')
详细见ggplot2绘图:qPCR数据箱式图叠加散点图1
ggplot2绘图:qPCR数据箱式图叠加散点图1_Sayond的博客-CSDN博客
P1 <- ggplot(Data1,aes(x=treatment,y=score,fill=treatment))+
stat_boxplot(geom = "errorbar",width=0.5,size=1.5,position = position_dodge(0.8))+ #使用误差条的方式补上
geom_boxplot(width=0.5,position = position_dodge(0.8))+
geom_boxplot() +
geom_signif(comparisons = list(c("a-1", "a-2"),c("b-1", "b-2"),c("c-1", "c-2")),map_signif_level=TRUE)+
theme_bw()+
geom_boxplot(size=1.5,outlier.fill="white",outlier.color="white")+ #size设置箱线图的边框线和误差条线宽度,fill设置填充颜色,outlier.fill和outlier.color设置异常点的属性
geom_jitter(aes(fill=treatment),width =0.2,shape = 20,size=4.5)+ #设置为向水平方向抖动的散点图,width指定了向水平方向抖动,不改变纵轴的值
scale_color_manual(values=c("black",