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(...))