将单个pdf保存到R中的一个文件

Question

我的数据设置如下

set.seed(10)
test <- data.frame(exp = rep(LETTERS[1:5], each = 4), x = rnorm(20, 10, 2), y = rnorm(20, 11, 1))

我想为数据中的每个级别绘制几个数字，并将结果保存到一个pdf文件而不使用Acrobat Pro

我做了一次创建单个图的尝试，但如果可以从中创建一个文件，我就不会结。

for (i in levels(test$exp)){
  da <-  subset(test, exp == i)
    pdf(paste(i, ".pdf", sep=""))
      plot(da$x, da$y)
    dev.off()
}

Answer 1

如果我们需要一个pdf，请移除pdf行和dev.off并将其保留在for循环之外。

pdf("somefile.pdf")
for (i in levels(test$exp)){
   da <-  subset(test, exp == i)
   plot(da$x, da$y)
 }
dev.off()