R语言批量画图

https://www.jianshu.com/p/e541fa218294

用循环

普通模式

pdf(xxx)

p

dev.off()

此模式有bug，pdf要么打不开，要么打开是空白

用ggsave(p,file=paste(name,".pdf",sep=""))   ##ggsave批量生成name变量为名字的pdf文件

for(i in data_all){

  p<-ggplot(data=i, aes(x=V1,y=V2))+geom_boxplot(aes(fill=V1),outlier.shape= NA)

  print(p)  ###这一步简单又重要，当时自己就是卡在这里，知道这个命令的觉得很简单，不知道的就得查好久###不一定有用

}

dev.off()