r - 'plot' 和 'ggplot' 并排生成的图

Question

有没有办法将函数生成的plot图和ggplotR 中的函数生成的图并排放在一个页面中？

par使用or函数很容易将同一函数创建的图放到一页中multiplot，但我无法弄清楚上述问题。

Answer 1

您可以使用gridBase包和视口来执行此操作。

library(grid)
library(gridBase)
library(ggplot2)

# start new page
plot.new() 

# setup layout
gl <- grid.layout(nrow=1, ncol=2)
# grid.show.layout(gl)

# setup viewports
vp.1 <- viewport(layout.pos.col=1, layout.pos.row=1) 
vp.2 <- viewport(layout.pos.col=2, layout.pos.row=1) 
# init layout
pushViewport(viewport(layout=gl))
# access the first position
pushViewport(vp.1)

# start new base graphics in first viewport
par(new=TRUE, fig=gridFIG())

plot(x = 1:10, y = 10:1)

# done with the first viewport
popViewport()

# move to the next viewport
pushViewport(vp.2)

ggplotted <- qplot(x=1:10,y=10:1, 'point')
# print our ggplot graphics here
print(ggplotted, newpage = FALSE)

# done with this viewport
popViewport(1)

此示例是Dylan Beaudette的此博客文章的修改版本

Answer 2

是的。它们都是基于网格的图形系统并返回图形对象。看看 gridExtra 包中的 grid.arrange 函数