Funtionはggplotオブジェクトをggplotオブジェクトに作成しました

Question

関数生成プロットからggplotオブジェクトを作成する方法。私はggplotに二重y軸プロットを作成する関数を使用していますが、それはggとggplotオブジェクトと他のggplotオブジェクトのようなggplotオブジェクトに変換できません。

我々はこのような二つのグラフがある場合のように：

p1 <- qplot(wt, mpg, data=mtcars) 
p2 <- ggplot(diamonds, aes(price, colour = cut)) + geom_density() 

を今、私はこれらのコードを使用して、これらの2を組み合わせて、第三のプロット作成：それはプロットを生成するが、私は思い出すことができない

p3 <- grid.arrange(p1,p2,ncol=2) 

を後でp3プロットすると、p1またはp2の場合と同じようにggplotとしてレンダリングされなかったことを意味します。

私は今すぐpdfまたは画像ファイルとしてエクスポートしたくありません。私の考えは、後でp3プロットを使用し、他のggplotsと組み合わせることです。

Answer 1

grid.arrangeで作成されたgtableオブジェクトを印刷するには、grid::grid.drawを使用します。 p1とp2を組み合わせたときに出力を抑制したい場合は、代わりにgrid.arrange

library(ggplot2) 
library(gridExtra) 
library(grid) 

p1 <- qplot(wt, mpg, data=mtcars) 
p2 <- ggplot(diamonds, aes(price, colour = cut)) + geom_density() 

p3 <- arrangeGrob(p1,p2,ncol=2) 
grid.draw(p3) 

p4 <- arrangeGrob(p3, p1, nrow=2) 
grid.draw(p4)