r - 在 for 循环中打印为 PDF

Question

我想循环绘图并将绘图结果放入 PDF 中。

以下代码用于执行此操作:

它的作用是循环 3 次并根据 iris 数据集绘制 3 个不同的图。然后它应该将其保存到C:/驱动器。 PDF 文件已创建，但已损坏。

for(i in 1:3){
  pdf(paste("c:/", i, ".pdf", sep=""))
  plot(cbind(iris[1], iris[i]))
  dev.off()
}

Answer 1

要在设备上绘制点阵图，需要打印通过调用点阵图形函数之一生成的对象。通常，在交互式使用中，如果未分配，R 会自动打印对象。然而，在循环中，自动打印不起作用，因此必须安排要打印的对象，通常是将其包装在 print() 中。

这是一个示例(请原谅我滥用公式符号；-):

require(lattice)
for(i in 1:3) {
    pdf(paste("plot", i, ".pdf", sep = ""))
    print(xyplot(iris[,1] ~ iris[,i], data = iris))
    dev.off()
}

这会在 pdf 设备上生成三个绘图。