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

Question

这个问题在这里已经有了答案:




9年前关闭。

Possible Duplicate:
How to print R graphics to multiple pages of a PDF and multiple PDFs?

我是 R 的新手，有一个简单的问题。以下代码为每个图形写入一个 .pdf 文件。我想在一个 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()带有计数器变量。