我使用以下代码在单个pdf文件中保存多个图。单个图表运行良好,但有一个循环我得到一个没有页面的损坏文件
pdf("HistogramsAll.pdf", onefile=TRUE)
for (i in 1:nFilt) {
d.i<-dAll[,c(1,i+1)];
nameP.i<-names(dAll)[i+1];
names(d.i)<-c("cond", "p");
ggplot(data=d.i, aes(x=p, fill=cond))+
geom_histogram(binwidth=.3, position="dodge") +
ggtitle(eval(nameP.i));
}
dev.off()
答案 0 :(得分:1)
根据documentation,循环内部需要显式的print()
。
通常,您无需显式打印或绘制ggplot2图: 默认的顶级打印方法将为您完成。你会, 但是,如果要绘制绘图,则需要显式调用print() 在函数内部或循环中。