绘制带误差bar的统计图,关键点在于计算个统计量
df的是R自带数据Toothgrowth
df$dose<-as.factor(df$dose) #需要将...len,by=list(df$supp,df$dose),mean) #一定要加list,分组计算均值
colnames(dataMean)的均值...dataStd)<-c("supp","dose","sd")
nd的分组合并...scale_y_continuous(breaks=seq(0,30,5),limits=c(0,30),expand=c(0,0)) #expand=c(0,0)让坐标从0开始
image.png
分版绘制