R 使用ggplot在单个PDF文件中进行多个绘图

我使用以下代码在一个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()

pdf（“HistogramsAll.pdf”，onefile=TRUE）
对于（1中的i:nFilt）{
d、 i根据，循环中需要显式的
print（）

通常，不需要显式打印或打印ggplot2打印：
默认的顶级打印方法将为您执行此操作。您将，
但是，如果要绘制绘图，则需要显式调用print（）
在函数或for循环中

你需要显式地<代码>打印（）/<代码>图吗？是的，带有打印（）。谢谢。这是一个答案。如果它解决了你的问题，请考虑把它标记为接受。