r语言 - 如何掌握基本图形图块.new通过arangeGrob与其他图形结合?

Question

>我有以下简化的用例。基本上，我有一些ggplot2图，我想将其与使用基本图形库plot.new()等生成的另一个图结合使用：

p1 <- generate_ggplot1(...)
p2 <- generate_ggplot2(...)
p3 <- generate_ggplot3(...)
# how to get hold of the plot output and make it available as 
# p4 for arrangeGrob?
plot.new()
...
final <- gridExtra::arrangeGrob(p1, p2, p3, p4, layout_matrix = rbind(c(1,2), c(3,4)), widths=c(7,7), heights=c(7,7))
ggplot2::ggsave(filename=output.file,plot=final,width=14,height=14)

有什么选择可以做到这一点？ 与重写 P4 以成为本机ggplot2分开

Answer 1

试试这个，

library(gridGraphics)
library(grid)
library(gridExtra)
library(ggplot2)
grab_grob <- function(...){
grid.echo(...)
grid.grab()
}
b <- grab_grob(function() plot(cars))
g <- ggplot()
grid.arrange(b, g)