将多个图表依次保存在一个 pdf 文件中

发布于 2024-12-06 08:59:33 字数 572 浏览 0 评论 0原文

可能的重复：
如何打印 R图形到 PDF 的多个页面和多个 PDF？

我是 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  
}

原文

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

I am new to R and have a quick question. The following code writes one .pdf file for each graph. I would like to add figures one after another in ONE pdf file. Thank you so much. Greatly appreciate any help.

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  
}

分享到QQ

分享到微博

如果你对这篇内容有疑问，欢迎到本站社区发帖提问参与讨论，获取更多帮助，或者扫码二维码加入 Web 技术交流群。

发布评论

需要登录才能够评论，你可以免费注册一个本站的账号。

冷…雨湿花 2024-12-13 08:59:33

只需将 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() 。

Just move your pdf() function call and your dev.off() call outside the loop:

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()

Note my use the the seq() function to loop instead of while() with a counter variable.

回复收藏 0 原文

~没有更多了~