3

grid.draw複数の出力を単一のプロットに配置できる方法はありますか。

以下に示すように、複数のgrid.draw出力があります。

g <- ggplotGrob(p1)
g <- gtable_add_grob(g, rasterGrob(img,width=unit(3,"cm"),x =     
                     unit(49,"cm")),t=2.5,l=1,b=1,r=5,z=Inf)
     grid.newpage()
     grid.draw(g)


g1 <- ggplotGrob(p2)
g1 <- gtable_add_grob(g1, rasterGrob(img,width=unit(3,"cm"),x =     
                     unit(49,"cm")),t=2.5,l=1,b=1,r=5,z=Inf)
     grid.newpage()
     grid.draw(g1)


g2 <- ggplotGrob(p2)
g2 <- gtable_add_grob(g2, rasterGrob(img,width=unit(3,"cm"),x =     
                     unit(49,"cm")),t=2.5,l=1,b=1,r=5,z=Inf)
     grid.newpage()
     grid.draw(g2)


g3 <- ggplotGrob(p3)
g3 <- gtable_add_grob(g3, rasterGrob(img,width=unit(3,"cm"),x =     
                     unit(49,"cm")),t=2.5,l=1,b=1,r=5,z=Inf)
     grid.newpage()
     grid.draw(g3)

試してみgrid.arrangeましたが、Error saying object g1 not found.

以下のコードを使用しました。

grid.arrange(grid.draw(g1),grid.draw(g2),grid.draw(g3),ncol=2)
4

0 に答える 0