R中的ggplot2无法在pdf中生成1000+个图

Question

我正在R中使用ggplot2将1500个图绘制成pdf。但是我的输出pdf只有1000个图/页。我们如何以pdf格式打印全部1500？

以下代码供您参考：

plots_list = list()
for(i in 1:1500){
  p = ggplot(mtcars, aes(x = mpg)) + geom_line(aes(y = hp)) 
  plots_list[[i]] = p
}

pdf("final_plots.pdf")
plots_list
dev.off()

Answer 1

将max.print选项设置为更高的数字：

options(max.print = 1500)

或遍历您的plots_list：

pdf("final_plots.pdf")
for (i in 1:length(plots_list)) {
  print(plots_list[[i]])
}
dev.off()