绘制带误差bar的统计图,关键点在于计算个统计量
df的是R自带数据Toothgrowth
df$dose<-as.factor(df$dose) #需要将...len,by=list(df$supp,df$dose),mean) #一定要加list,分组计算均值
colnames(dataMean)的均值...ggplot(nd,aes(x=supp,y=mean,fill=dose))+
geom_bar(position=position_dodge(),color="black",width=0.4,...panel.grid.minor = element_blank(),
axis.line = element_line(colour = "black",size=0.5), #设置坐标轴线条颜色和粗细...scale_y_continuous(breaks=seq(0,30,5),limits=c(0,30),expand=c(0,0)) #expand=c(0,0)让坐标从0开始
image.png
分版绘制
ggplot