在一个pdf文件中一个接一个地保存多个图形

Question

  

可能重复：
  How to print R graphics to multiple pages of a PDF and multiple PDFs?

我是R的新手并且有一个简单的问题。以下代码为每个图形写入一个.pdf文件。我想在ONE pdf文件中一个接一个地添加数字。非常感谢。非常感谢任何帮助。

i=5  
while (i<=10)   
{   
  name1="C:\\temp\\"  
  num=i   
  ext = ".pdf"  
  path3 = paste(name1,num,ext)  
  par(mfrow = c(2,1))  
  pdf(file=path3)  
  VAR1=rnorm(i)  
  VAR2=rnorm(i)  
  plot(VAR1,VAR2)  
  dev.off()  
  i=i+1  
}  

Answer 1

只需将您的pdf()函数调用和dev.off()调用移出循环：

somePDFPath = "C:\\temp\\some.pdf"
pdf(file=somePDFPath)  

for (i in seq(5,10))   
{   
  par(mfrow = c(2,1))
  VAR1=rnorm(i)  
  VAR2=rnorm(i)  
  plot(VAR1,VAR2)   
} 
dev.off() 

注意我使用seq()函数来循环而不是while()和计数器变量。