在R中,当使用gridBase在图中嵌入子图时,如何防止pdf中的空白页

Question

正如这里所解释的那样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()

Answer 1

我认为这有点像黑客,但在我的机器上设置onefile = FALSE:

pdf("test.pdf", onefile=FALSE)

在寻找答案时(我在森林里偶然发现并没有那么多)我从Paul Murrell那里发现了这篇帖子给Rhelp,他承认混合网格和基础图形甚至让主人感到困惑.