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

Question

可能重复:
如何将R图形打印到多页PDF和多个PDF？

我是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()使用计数器变量.