ggplot2的代码
首先是将3个子表格的数据整理到一张表格里
比如这里我新建了一个子表格sheet4,数据最终的格式如下(原始数据里第一列的编号是没有用的,可以直接删掉)
接下来R语言里操作
首先是读取数据...)
}
ebbottom<-function(x){
return(mean(x)-sd(x)/sqrt(length(x)))
}
ggplot2作图
library(ggplot2)
ggplot..."XXXXX",y="YYYYY")
调整不同分组之间的顺序
new_df$name<-factor(new_df$name,
levels = c("var2..."XXXXX",y="YYYYY")
这里新学到一个知识点是,柱子默认是不贴底的,如果要贴底使用函数scale_y_continuous(expand = expansion(mult = c(0,0.1...)))
mult对应的两个值一个是控制下面,一个是控制上面,贴底就设置为0 就可以了
还有一个知识点是 expand.grid(x=c(1,2,3),y=c(4,5,6)) 可以生成两两配对的数据