R出力の記録
をテンプレートにして作成
[
トップ
] [
新規
|
一覧
|
検索
|
最終更新
|
ヘルプ
]
開始行:
R のセッションでコンソールに打ち込んだ入力、そして出力を...
#contents
----
* テキスト出力の記録 [#ic1b7dd6]
**Unix の COLOR(magenta){tee} 命令の利用 [#r4937e56]
もし Unix 系の OS を使っているならば、COLOR(magenta){tee}...
R | tee R.log
COLOR(magenta){tee} は標準入力(この場合 R セッションでの...
R | tee -a R.log
**R の COLOR(red){capture.output} 関数の利用 [#hdc4a09f]
R のバージョン 1.7 で付け加えられた新しい関数 COLOR(red){...
> t=capture.output( t.test( rnorm(10), rnorm(10, 2) ) )
> t
[1] ""
[2] "\tWelch Two Sample t-test"
[3] ""
[4] "data: rnorm(10) and rnorm(10, 2) "
[5] "t = -4.9303, df = 17.535, p-value = 0.0001162"
[6] "alternative hypothesis: true difference in means i...
[7] "95 percent confidence interval:"
[8] " -2.943190 -1.182000 "
[9] "sample estimates:"
[10] " mean of x mean of y "
[11] "-0.01055496 2.05204024 "
[12] ""
COLOR(red){example()} 関数の出力も扱える
> glmexample <- capture.output(example(glm))
> glmexample
[1] ""
[2] "glm> counts <- c(18, 17, 15, 20, 10, 20, 25, 13, ...
[3] ""
[4] "glm> outcome <- gl(3, 1, 9)"
(以下省略)
Unix の COLOR(magenta){enscript} 命令を使うと、直接ポスト...
capture.output(example(glm), file=pipe("enscript -o temp...
**(X)Emacs のシェルモードを利用する [#lb5e5440]
Unix で広く使われている高機能エディタ COLOR(magenta){(X)E...
あるファイルの中身は COLOR(red){Esc-x insert-file} 命令を...
同様の操作は [[ESS]] でも可能．こちらの方が統計環境に特化...
**COLOR(red){sink} 命令 [#na4ea430]
R の命令 COLOR(red){sink()} は R のコンソール出力の出力先...
> sink(file = "foo.doc") # 出力をファイル "foo.doc" に...
# 既定では既存のフ...
> sink(file = "oldfoo.doc", append = TRUE) # 既存のファ...
> sink() # (引数無し) 出力を再びコンソールに切替え
※コンソールとファイルの両方に同時出力するためには、引数に...
※sink()コマンドの問題点は、コマンドの実行結果のみがファイ...
これを回避する一つの方法は、実行したいコマンドの直前で次...
> cat("実行したいコマンドの名前などを入れる\n")
cat()コマンドを用いて、記録する。
COLOR(red){sink()} の便利な使い方は、インタラクティブに定...
> myfun <- function(x) {............} # 関数定義
> sink(file = "myfun.R", append = TRUE) # 出力を追記モー...
> myfun # 関数定義内...
> sink() # 出力をコンソールに戻す
**X window の copy, paste 機能 [#y42bc7fd]
お手軽な方法として、COLOR(magenta){X window} のマウスによ...
**MS Windows ユーザーは [#k852bec7]
(すぐに Linux に切替える（冗談）。私は使ったことが無いの...
-補足2010/09/16
windowsのGUI版で、Rを出力する一つの解決策は、TeachingDemo...
> library(TeachingDemos) #予めパッケージをインストールし...
> txtStart("ここに出力ファイル名.txt", commands = TRUE, ...
> #ここに記録すべきコマンド
> txtStop() #引数なし、このコマンドでファイルへの出力の...
Windows版GUIのRで動作確認済み。((Macではターミナル版Rでは...
-補足2009/1/2
windowsでもsink()が使えます。例えば回帰分析の結果の画面表...
- RGuiなら、ファイル→「ファイルの保存」でログがテキストフ...
- 問題は、出力結果は記録されますが、コマンドそのものは記...
#comment
**Macintosh ユーザーは [#sa2e18a3]
-コンソールからコピー＆ペースト
-GUI版のRならメニュー>保存かcommand+Sでコンソールの内容を...
-ターミナルからRが起動できる環境なら、command.Rというコマ...
R --save <command.R >commandlog.txt
でcommandlog.txtにログを全てとることができます。
-もちろん
R | tee R.log
も使える。
- R --save <command.R >commandlog.txt はコマンド終了後自...
- 拡張子が.Rのテキストエディタに、library(TeachingDemos.R...
R --save <command.R
と実行することでもlogファイルの作成が可能です。-- [[のの]]
&new{2010-09-01 (水) 06:22:26};
- OSX用の[[RStudio>http://www.rstudio.org/]]を使う方法も...
- 久しぶりにTeachingDemosをチェックしたらVersionが2.8にな...
#comment
*グラフィックス出力の記録は? [#o8f76a1a]
** postscript() デバイス [#z4dec07e]
R のグラフィックスを適当な画像形式で保存する基本は COLOR(...
data(Titanic)
# ポストスクリプトデバイスを開く。出力 EPS ファイル名を...
# horizontal=FALSE を指定しないと、LaTeX に取り込んだ時...
postscript("mosaicplot.eps", horizontal=FALSE, height=9,...
mosaicplot(Titanic, main = "Survival on the Titanic", co...
dev.off() # 必要な出力がすべて終ったら、すぐにデバイス...
** recordPlot() , replayPlot() [#z39a6f18]
COLOR(red){recordPlot()} は現在アクティブなデバイスに表示...
> plot(1:10, rinif(10)) # X11 画面への出力
> pp <- recordPlot() # （引数無し) 現在の X11 画面の...
> pp # 何も表示されない
#（大量の可読性の低い内容なので...
> postscript("pp.eps") # ポストスクリプトデバイスを開く
> replayPlot(pp) # pp の内容を現在のデバイス(ポ...
> dev.off() # デバイスを閉じる（これを忘れ...
> png("pp.png") # 今度は png デバイスを開く
> replayPlot(pp) # pp の内容を現在のデバイス(png...
> dev.off() # png デバイスを閉じる
** dev.print() [#s0666b67]
COLOR(red){dev.print()} は現在アクティブなグラフィックス...
> X11() # X11 ...
> plot(rnorm(10), main="Plot 1") # X11 デバイスに出力
> dev.print(file="ss.eps",width=6, height=6, horizontal=...
> dev.copy2eps(file="ss.eps",width=6, height=6, horizont...
注意：pdf, pictex, png, jpg 等の他のデバイスにも再出力可...
**スクリーンキャプチャ [#pde28efa]
お手軽な方法は COLOR(magenta){スクリーンキャプチャ} と呼...
((例えば Linux の KDE デスクトップには COLOR(magenta){KSn...
を使って既定の COLOR(red){X11} デバイス画面そのものを画像...
** BMP JPEG and PNG 形式でのグラフの出力（保存) [#f478c929]
書式:
bmp(filename = "graphic.bmp", width = 480, height = 480,
pointsize = 12, bg = "white", res = NA, restoreConsol...
jpeg(filename = "graphic.jpg", width = 480, height = 480,
pointsize = 12, quality = 75, bg = "white", res = NA,
restoreConsole = TRUE)
png(filename = "graphic.png", width = 480, height = 480,
pointsize = 12, bg = "white", res = NA, restoreConso...
ちなみに、bmp(),jpeg(),png(）といった作図関数のことをデ...
(参考：http://takenaka-akio.cool.ne.jp/doc/r_auto/chapte...
引数:
filename: 出力先（作成する）ファイル名
※未記入だと「Rplot001.png」などのように順番にファイル名...
width: 画像の幅（pixel数？）
height: 画像の高さ（pixel数？）
pointsize: プロットのポイントの大きさ（pixel数？）
bg: 背景の色
quality: JPEGの画質（％）:画質が低いと画像がぼんやりしま...
res: BMPで保存される場合のnominal resolution in dpi ？
restoreConsole: See the Details section of windows ？
使用例：
png("test.png", width = 480, height = 480, pointsize = 1...
bg = "white", res = NA, restoreConsole = TRUE) ...
plot(1:10) ...
dev.off() ...
注意:
(1)画像の幅と高さ（widthとheight）の単位はinchでなくpixe...
20未満の数値を入力してしまうと警告されます。
(2)起動したデバイスは、dev.off()で閉じないと画像ファイル...
**MS Windowsでベクター形式（WMFファイル）でのグラフの出力...
ほとんど上記のPNGと同じ使い方で、win.metafile(filename="h...
*オブジェクトの記録は [#h3e62465]
**特定のオブジェクトのディスクファイルへの記録。COLOR(red...
特定のオブジェクトをファイルへ記録数するには COLOR(red){s...
> x <- runif(10)
> y <- c("abc", "def")
> save(x, y, file="xy.data") # 二つのオブジェクトをファ...
> rm(x, y) # オブジェクトを消す
> ls()
character(0) # 消えた
> load("xy.data") # 再読み込み
> ls()
[1] "x" "y" # 復元されている
あるセッションのすべてのオブジェクトを、他のワークスペー...
> save(list = ls(), file= "all.Rdata") # すべてのオブジ...
> load("all.Rdata") # 現在のワ...
> load("all.Rdata", .GlobalEnv) # ユーザーワークス...
** データオブジェクトのテキストファイルへの記録。 write()...
-書式 COLOR(magenta){write(x, file = "data", ncolumns = i...
-引数
-- COLOR(magenta){x}: 書き出すデータ
-- COLOR(magenta){file}: 接続、もしくはファイル名を表す文...
-- COLOR(magenta){ncolumns}: 一行に書き出すデータの個数 (...
-- COLOR(magenta){append:} もし 'TRUE' ならデータはファ...
> x = matrix(1:12, ncol=3)
> x
[,1] [,2] [,3]
[1,] 1 5 9
[2,] 2 6 10
[3,] 3 7 11
[4,] 4 8 12
> write(x, file="x.data")
> scan("x.data") # scan 関数で再読み込み(結果はベクト...
Read 12 items
[1] 1 2 3 4 5 6 7 8 9 10 11 12
> xx = matrix(scan("x.data"), ncol=3) # また行列に変換
Read 12 items
> xx
[,1] [,2] [,3]
[1,] 1 5 9
[2,] 2 6 10
[3,] 3 7 11
[4,] 4 8 12
ちなみに、ファイル x.data は次のように数値の場合既定で一...
1 2 3 4 5
6 7 8 9 10
11 12
注意：ファイルそのものを直接編集したいのでなければ、次の...
> save(x, file="temp.data") # ファイル temp.data はテキ...
> rm(x)
> load("temp.data") # オブジェクト x が復元される
** プログラムの出力を順次指定ファイルに書き込む writeLine...
注意：paste(z) は数値を文字列に変換する裏技 (as.character...
注意：writwLines 関数は既定で文字列の最後に "\n" (改行コ...
注意：複数のファイルを同時に開いている場合は writeLines(p...
fout <- file("./c:/test.txt", "w") # ファイルを書き込み...
x <- 5
for (i in 1:10) {
z <- x + i
writeLines(paste(z), fout) # z を文字列としてテキスト...
}
close(fout) # ファイルを閉じる
**オブジェクトを再現可能な表現でファイルにテキストファイ...
オブジェクト名もそのまま記録される。
ただし現在のところ、関数と簡単なベクトル以外では支障がお...
-書式 COLOR(red){dump(list, file = "dumpdata.R", append =...
-引数
--COLOR(red){list} 文字列。一つ以上の R オブジェクト名
--COLOR(red){file} 書き込み先ファイルもしくは接続名
--COLOR(red){append} もし COLOR(red){TRUE} なら追記、COLO...
--COLOR(red){envir} オブジェクトを探すべき環境
: the environment to search for objects.
x <- 1; y <- 1:10
dump(ls(patt='^[xyz]'), "xyz.Rdmped") #x,y,z で始まるオ...
rm(x, y)
unlink("xyz.Rdmped") # ファイルへの接続の切断
load("xyz.Rdumped") # 再読み込み
**オブジェクトをファイルにテキストファイルとして書き込む ...
オブジェクト名は記録されない
-書式
-- COLOR(red){dput(x, file = "")}
-- COLOR(red){dget(file)}
## 関数 mean をアスキー形式でファイル "foo" に書き込む
dput(mean, "foo")
## それを bar という名前で再読み込み
bar <- dget("foo")
unlink("foo")
*Rの実行過程を記録し，再現する [#wf42f6eb]
Rパッケージ evaluate はRの実行過程の結果を逐一リストオブ...
記録し，後から再現できるようにする．画像も記録復元できる...
Rの実行デモ用の関数については [[Rのデモ用の関数]] を参照．
終了行:
R のセッションでコンソールに打ち込んだ入力、そして出力を...
#contents
----
* テキスト出力の記録 [#ic1b7dd6]
**Unix の COLOR(magenta){tee} 命令の利用 [#r4937e56]
もし Unix 系の OS を使っているならば、COLOR(magenta){tee}...
R | tee R.log
COLOR(magenta){tee} は標準入力(この場合 R セッションでの...
R | tee -a R.log
**R の COLOR(red){capture.output} 関数の利用 [#hdc4a09f]
R のバージョン 1.7 で付け加えられた新しい関数 COLOR(red){...
> t=capture.output( t.test( rnorm(10), rnorm(10, 2) ) )
> t
[1] ""
[2] "\tWelch Two Sample t-test"
[3] ""
[4] "data: rnorm(10) and rnorm(10, 2) "
[5] "t = -4.9303, df = 17.535, p-value = 0.0001162"
[6] "alternative hypothesis: true difference in means i...
[7] "95 percent confidence interval:"
[8] " -2.943190 -1.182000 "
[9] "sample estimates:"
[10] " mean of x mean of y "
[11] "-0.01055496 2.05204024 "
[12] ""
COLOR(red){example()} 関数の出力も扱える
> glmexample <- capture.output(example(glm))
> glmexample
[1] ""
[2] "glm> counts <- c(18, 17, 15, 20, 10, 20, 25, 13, ...
[3] ""
[4] "glm> outcome <- gl(3, 1, 9)"
(以下省略)
Unix の COLOR(magenta){enscript} 命令を使うと、直接ポスト...
capture.output(example(glm), file=pipe("enscript -o temp...
**(X)Emacs のシェルモードを利用する [#lb5e5440]
Unix で広く使われている高機能エディタ COLOR(magenta){(X)E...
あるファイルの中身は COLOR(red){Esc-x insert-file} 命令を...
同様の操作は [[ESS]] でも可能．こちらの方が統計環境に特化...
**COLOR(red){sink} 命令 [#na4ea430]
R の命令 COLOR(red){sink()} は R のコンソール出力の出力先...
> sink(file = "foo.doc") # 出力をファイル "foo.doc" に...
# 既定では既存のフ...
> sink(file = "oldfoo.doc", append = TRUE) # 既存のファ...
> sink() # (引数無し) 出力を再びコンソールに切替え
※コンソールとファイルの両方に同時出力するためには、引数に...
※sink()コマンドの問題点は、コマンドの実行結果のみがファイ...
これを回避する一つの方法は、実行したいコマンドの直前で次...
> cat("実行したいコマンドの名前などを入れる\n")
cat()コマンドを用いて、記録する。
COLOR(red){sink()} の便利な使い方は、インタラクティブに定...
> myfun <- function(x) {............} # 関数定義
> sink(file = "myfun.R", append = TRUE) # 出力を追記モー...
> myfun # 関数定義内...
> sink() # 出力をコンソールに戻す
**X window の copy, paste 機能 [#y42bc7fd]
お手軽な方法として、COLOR(magenta){X window} のマウスによ...
**MS Windows ユーザーは [#k852bec7]
(すぐに Linux に切替える（冗談）。私は使ったことが無いの...
-補足2010/09/16
windowsのGUI版で、Rを出力する一つの解決策は、TeachingDemo...
> library(TeachingDemos) #予めパッケージをインストールし...
> txtStart("ここに出力ファイル名.txt", commands = TRUE, ...
> #ここに記録すべきコマンド
> txtStop() #引数なし、このコマンドでファイルへの出力の...
Windows版GUIのRで動作確認済み。((Macではターミナル版Rでは...
-補足2009/1/2
windowsでもsink()が使えます。例えば回帰分析の結果の画面表...
- RGuiなら、ファイル→「ファイルの保存」でログがテキストフ...
- 問題は、出力結果は記録されますが、コマンドそのものは記...
#comment
**Macintosh ユーザーは [#sa2e18a3]
-コンソールからコピー＆ペースト
-GUI版のRならメニュー>保存かcommand+Sでコンソールの内容を...
-ターミナルからRが起動できる環境なら、command.Rというコマ...
R --save <command.R >commandlog.txt
でcommandlog.txtにログを全てとることができます。
-もちろん
R | tee R.log
も使える。
- R --save <command.R >commandlog.txt はコマンド終了後自...
- 拡張子が.Rのテキストエディタに、library(TeachingDemos.R...
R --save <command.R
と実行することでもlogファイルの作成が可能です。-- [[のの]]
&new{2010-09-01 (水) 06:22:26};
- OSX用の[[RStudio>http://www.rstudio.org/]]を使う方法も...
- 久しぶりにTeachingDemosをチェックしたらVersionが2.8にな...
#comment
*グラフィックス出力の記録は? [#o8f76a1a]
** postscript() デバイス [#z4dec07e]
R のグラフィックスを適当な画像形式で保存する基本は COLOR(...
data(Titanic)
# ポストスクリプトデバイスを開く。出力 EPS ファイル名を...
# horizontal=FALSE を指定しないと、LaTeX に取り込んだ時...
postscript("mosaicplot.eps", horizontal=FALSE, height=9,...
mosaicplot(Titanic, main = "Survival on the Titanic", co...
dev.off() # 必要な出力がすべて終ったら、すぐにデバイス...
** recordPlot() , replayPlot() [#z39a6f18]
COLOR(red){recordPlot()} は現在アクティブなデバイスに表示...
> plot(1:10, rinif(10)) # X11 画面への出力
> pp <- recordPlot() # （引数無し) 現在の X11 画面の...
> pp # 何も表示されない
#（大量の可読性の低い内容なので...
> postscript("pp.eps") # ポストスクリプトデバイスを開く
> replayPlot(pp) # pp の内容を現在のデバイス(ポ...
> dev.off() # デバイスを閉じる（これを忘れ...
> png("pp.png") # 今度は png デバイスを開く
> replayPlot(pp) # pp の内容を現在のデバイス(png...
> dev.off() # png デバイスを閉じる
** dev.print() [#s0666b67]
COLOR(red){dev.print()} は現在アクティブなグラフィックス...
> X11() # X11 ...
> plot(rnorm(10), main="Plot 1") # X11 デバイスに出力
> dev.print(file="ss.eps",width=6, height=6, horizontal=...
> dev.copy2eps(file="ss.eps",width=6, height=6, horizont...
注意：pdf, pictex, png, jpg 等の他のデバイスにも再出力可...
**スクリーンキャプチャ [#pde28efa]
お手軽な方法は COLOR(magenta){スクリーンキャプチャ} と呼...
((例えば Linux の KDE デスクトップには COLOR(magenta){KSn...
を使って既定の COLOR(red){X11} デバイス画面そのものを画像...
** BMP JPEG and PNG 形式でのグラフの出力（保存) [#f478c929]
書式:
bmp(filename = "graphic.bmp", width = 480, height = 480,
pointsize = 12, bg = "white", res = NA, restoreConsol...
jpeg(filename = "graphic.jpg", width = 480, height = 480,
pointsize = 12, quality = 75, bg = "white", res = NA,
restoreConsole = TRUE)
png(filename = "graphic.png", width = 480, height = 480,
pointsize = 12, bg = "white", res = NA, restoreConso...
ちなみに、bmp(),jpeg(),png(）といった作図関数のことをデ...
(参考：http://takenaka-akio.cool.ne.jp/doc/r_auto/chapte...
引数:
filename: 出力先（作成する）ファイル名
※未記入だと「Rplot001.png」などのように順番にファイル名...
width: 画像の幅（pixel数？）
height: 画像の高さ（pixel数？）
pointsize: プロットのポイントの大きさ（pixel数？）
bg: 背景の色
quality: JPEGの画質（％）:画質が低いと画像がぼんやりしま...
res: BMPで保存される場合のnominal resolution in dpi ？
restoreConsole: See the Details section of windows ？
使用例：
png("test.png", width = 480, height = 480, pointsize = 1...
bg = "white", res = NA, restoreConsole = TRUE) ...
plot(1:10) ...
dev.off() ...
注意:
(1)画像の幅と高さ（widthとheight）の単位はinchでなくpixe...
20未満の数値を入力してしまうと警告されます。
(2)起動したデバイスは、dev.off()で閉じないと画像ファイル...
**MS Windowsでベクター形式（WMFファイル）でのグラフの出力...
ほとんど上記のPNGと同じ使い方で、win.metafile(filename="h...
*オブジェクトの記録は [#h3e62465]
**特定のオブジェクトのディスクファイルへの記録。COLOR(red...
特定のオブジェクトをファイルへ記録数するには COLOR(red){s...
> x <- runif(10)
> y <- c("abc", "def")
> save(x, y, file="xy.data") # 二つのオブジェクトをファ...
> rm(x, y) # オブジェクトを消す
> ls()
character(0) # 消えた
> load("xy.data") # 再読み込み
> ls()
[1] "x" "y" # 復元されている
あるセッションのすべてのオブジェクトを、他のワークスペー...
> save(list = ls(), file= "all.Rdata") # すべてのオブジ...
> load("all.Rdata") # 現在のワ...
> load("all.Rdata", .GlobalEnv) # ユーザーワークス...
** データオブジェクトのテキストファイルへの記録。 write()...
-書式 COLOR(magenta){write(x, file = "data", ncolumns = i...
-引数
-- COLOR(magenta){x}: 書き出すデータ
-- COLOR(magenta){file}: 接続、もしくはファイル名を表す文...
-- COLOR(magenta){ncolumns}: 一行に書き出すデータの個数 (...
-- COLOR(magenta){append:} もし 'TRUE' ならデータはファ...
> x = matrix(1:12, ncol=3)
> x
[,1] [,2] [,3]
[1,] 1 5 9
[2,] 2 6 10
[3,] 3 7 11
[4,] 4 8 12
> write(x, file="x.data")
> scan("x.data") # scan 関数で再読み込み(結果はベクト...
Read 12 items
[1] 1 2 3 4 5 6 7 8 9 10 11 12
> xx = matrix(scan("x.data"), ncol=3) # また行列に変換
Read 12 items
> xx
[,1] [,2] [,3]
[1,] 1 5 9
[2,] 2 6 10
[3,] 3 7 11
[4,] 4 8 12
ちなみに、ファイル x.data は次のように数値の場合既定で一...
1 2 3 4 5
6 7 8 9 10
11 12
注意：ファイルそのものを直接編集したいのでなければ、次の...
> save(x, file="temp.data") # ファイル temp.data はテキ...
> rm(x)
> load("temp.data") # オブジェクト x が復元される
** プログラムの出力を順次指定ファイルに書き込む writeLine...
注意：paste(z) は数値を文字列に変換する裏技 (as.character...
注意：writwLines 関数は既定で文字列の最後に "\n" (改行コ...
注意：複数のファイルを同時に開いている場合は writeLines(p...
fout <- file("./c:/test.txt", "w") # ファイルを書き込み...
x <- 5
for (i in 1:10) {
z <- x + i
writeLines(paste(z), fout) # z を文字列としてテキスト...
}
close(fout) # ファイルを閉じる
**オブジェクトを再現可能な表現でファイルにテキストファイ...
オブジェクト名もそのまま記録される。
ただし現在のところ、関数と簡単なベクトル以外では支障がお...
-書式 COLOR(red){dump(list, file = "dumpdata.R", append =...
-引数
--COLOR(red){list} 文字列。一つ以上の R オブジェクト名
--COLOR(red){file} 書き込み先ファイルもしくは接続名
--COLOR(red){append} もし COLOR(red){TRUE} なら追記、COLO...
--COLOR(red){envir} オブジェクトを探すべき環境
: the environment to search for objects.
x <- 1; y <- 1:10
dump(ls(patt='^[xyz]'), "xyz.Rdmped") #x,y,z で始まるオ...
rm(x, y)
unlink("xyz.Rdmped") # ファイルへの接続の切断
load("xyz.Rdumped") # 再読み込み
**オブジェクトをファイルにテキストファイルとして書き込む ...
オブジェクト名は記録されない
-書式
-- COLOR(red){dput(x, file = "")}
-- COLOR(red){dget(file)}
## 関数 mean をアスキー形式でファイル "foo" に書き込む
dput(mean, "foo")
## それを bar という名前で再読み込み
bar <- dget("foo")
unlink("foo")
*Rの実行過程を記録し，再現する [#wf42f6eb]
Rパッケージ evaluate はRの実行過程の結果を逐一リストオブ...
記録し，後から再現できるようにする．画像も記録復元できる...
Rの実行デモ用の関数については [[Rのデモ用の関数]] を参照．
ページ名:
![[RjpWiki]](image/../Rlogo.png "[RjpWiki]")
