r - 为什么这个 ggplot2 图表在循环时无法绘制？

Question

我试图通过循环一些数据来绘制大量图形，但是当绘图函数封装在 for 循环中时生成的图形是损坏的 PDF。

我在这里把它简化为一个最小的例子；这应该会按预期生成 1.pdf，但在循环内生成的 2.pdf 和 3.pdf 文件稍微小一些，并且不会在 PDF 阅读器软件中打开。

i <- 1

pdf(paste(i,'.pdf',sep=''))
ggplot(NULL,aes(x=i, y=i)) +
  geom_point() +
  coord_cartesian(xlim = c(0, 10), ylim = c(0, 10)) +
  ggtitle(paste('i =', i))
dev.off()


for(i in 2:3) {
  pdf(paste(i,'.pdf',sep=''))
  ggplot(NULL,aes(x=i, y=i)) +
    geom_point() +
    coord_cartesian(xlim = c(0, 10), ylim = c(0, 10)) +
    ggtitle(paste('i =', i))
  dev.off()
}

怎么了？

Answer 1

你必须打印它：print(ggplot(...))