Rでお絵かき その２ グラフをファイル保存

Rでお絵かき　その１　グラフおえかき
http://blog.goo.ne.jp/xmldtp/e/1f031c4e7f6559d8202daf37ac1b68fc


でグラフを描いた。きょうは、それをeps形式、jpeg形式で保存する。

---

■今日の課題

Ｒで以下の操作

delta<- 1000 
en.x<-seq(0,pi,length=delta) 
en.y<-sin(seq(0,pi,length=delta)) 
plot(en.x,en.y,type="l",xlim=c(0,pi),ylim=c(0,1))

により、得られた下の図

をeps形式、jpeg形式で保存する。

---

■eps形式で保存。

こんなかんじ

setwd("C:/tmp")

postscript("test1.eps", horizontal=FALSE, height=5, width=5,onefile=FALSE,paper="special")

plot(en.x,en.y,type="l",xlim=c(0,pi),ylim=c(0,1))

dev.off() 

setwdで書き出すディレクトリ（フォルダ）を指定している。
epsで書き出すには、postscriptコマンドを使う。
最後、dev.off()する。

---

■jpeg形式で保存

同じ理屈。

setwd("C:/tmp")

jpeg("test1.jpg", height=500, width=500)

plot(en.x,en.y,type="l",xlim=c(0,pi),ylim=c(0,1))

dev.off() 

---

次回は、For文でぐるぐる回す→ファイル名を変える

＜＜参考サイト＞＞

R出力の記録
http://www.okada.jp.org/RWiki/?R%BD%D0%CE%CF%A4%CE%B5%AD%CF%BF#z4dec07e