在R中，用gridBase在图中嵌入子图时如何防止pdf中的空白页
在R中，用gridBase在图中嵌入子图时如何防止pdf中的空白页
提问于 2012-09-18 16:35:06
正如here所解释的，由于有了gridBase，很容易将绘图嵌入到现有的绘图中，即使两个绘图都使用R的基本图形系统。然而，当将整个图形保存到pdf中时，第一页总是空白的。如何防止这种情况发生？
下面是一个示例：
require(gridBase)
## generate dummy data
set.seed(1859)
x <- 1:100
y <- x + rnorm(100, sd=5)
ols <- lm(y ~ x)
pdf("test.pdf")
## draw the first plot
plot.new() # blank page also happens when using grid.newpage()
pushViewport(viewport())
plot(x, y)
## draw the second plot, embedded into the first one
pushViewport(viewport(x=.75,y=.35,width=.2,height=.2,just=c("center","center")))
par(plt=gridPLT(), new=TRUE)
hist(ols$residuals, main="", xlab="", ylab="")
popViewport(2)
dev.off()回答 2
Stack Overflow用户
回答已采纳
发布于 2012-09-18 19:04:32
我认为这是一个小技巧，但在我的机器上设置onefile=FALSE是有效的：
pdf("test.pdf", onefile=FALSE)在寻找答案的过程中(我并没有真正找到答案，而是在森林中偶然发现的)，我遇到了这个post to Rhelp from Paul Murrell，他承认混合网格和基础图形甚至对大师来说都是令人困惑的。
Stack Overflow用户
发布于 2018-04-27 13:08:46
我发现的一种变通方法是在for循环中初始化pdf文件；然后插入一个if子句来评估第一次迭代是否正在运行。当当前迭代是第一次迭代时，继续使用pdf()创建输出设备。将dev.off()放在关闭for循环之后。下面是一个快速示例：
for(i in 1:5){
if (i=1) pdf(file = "test.pdf")
plot(rnorm(50, i, i), main = i)}
dev.off()页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接：
https://stackoverflow.com/questions/12481267
复制相关文章
相似问题
在R中的子图中创建子图
在R中的多图图的子图中增加斜率
在wxPython中嵌入子图
在r中嵌入字体，将ggket图保存为PDF。
在matplotlib中将小图嵌入到子图中
添加站长 进交流群
领取专属 10元无门槛券
AI混元助手 在线答疑
关注 腾讯云开发者公众号
洞察 腾讯核心技术
剖析业界实践案例
社区富文本编辑器全新改版！诚邀体验～
全新交互，全新视觉，新增快捷键、悬浮工具栏、高亮块等功能并同时优化现有功能，全面提升创作效率和体验
腾讯云开发者
