プロットをオブジェクトに保存する

ではggplot2、グラフィックをRオブジェクトに簡単に保存できます。

p = ggplot(...) + geom_point()      # does not display the graph
p                                   # displays the graph

標準関数plotは、グラフィックをvoid関数として生成し、NULLを返します。

p = plot(1:10)     # displays the graph
p                  # NULL

によって作成さplotれたグラフィックをオブジェクトに保存することはできますか？

ベースグラフィックはデバイス上に直接描画されます。

あなたが使うことができます

1- recordPlot

2-ベースグラフィックを同等のグリッドに変換するための最近導入されたgridGraphicsパッケージ

これが最小限の例です、

plot(1:10) 

p <- recordPlot()
plot.new() ## clean up device
p # redraw

## grab the scene as a grid object
library(gridGraphics)
library(grid)
grid.echo()
a <- grid.grab()

## draw it, changes optional
grid.newpage()
a <- editGrob(a, vp=viewport(width=unit(2,"in")), gp=gpar(fontsize=10))
grid.draw(a)

私はこれに非常に遅れていますが、質問を検索したときに最初に表示された質問でした。それで、私は質問に出くわす将来の視聴者のために私の解決策を追加したいと思います。

オブジェクトの代わりに関数を使用してこれを解決しました。たとえば、パラメータが異なる2つのベータ分布を比較するとします。実行できます：

z1<-rbeta(10000,5,5)
z2<-rbeta(10000,20,20)
plotit<-function(vector,alpha,beta){
plot(density(vector),xlim=c(0,1))
abline(v=alpha/(alpha+beta),lty="longdash")
}

そして、プロットをオブジェクトではなく関数として保存します。

z.plot1<-function(){plotit(z1,5,5)}
z.plot2<-function(){plotit(z2,20,20)}

次に、2つのプロットをオブジェクトではなく関数として呼び出すだけで、必要に応じて各プロットを呼び出すことができます。

z.plot1()

最初のプロットをプロットし、

z.plot2()

2番目をプロットします。

後でこれに遭遇する誰かを助けることを願っています！

pryr作成されたオブジェクトの値を直接変更したくない場合は、パッケージのアクティブバインディング機能を使用できます。

library(pryr)
a %<a-% plot(1:10,1:10)

aコンソールで入力するたびに、グラフが画面に再印刷されます。%<a-%オペレータは、（1つのグラフの場合には、これは私が考える問題ではありません）、スクリプトを毎回再実行します。したがって、基本的にa、コードを使用するたびにコードが再実行され、グラフが作成されます。もちろん、グラフを操作（別のプロットを上にオーバーレイ）したりpng、たとえばを使用して保存したりできます。aただし、値自体は格納されません。値は引き続きNULLになります。

上記があなたが探しているものであるかどうかはわかりませんが、それは許容できる解決策かもしれません。

library(ggplot2)
# if mygraph is a plot object
ggsave("myplot1.png",mygraph)

# if the plot is in a list (e.g. created by the Bibliometrics package)
ggsave("myplot1.png",mygraphs[[1]])