トップ 差分 一覧 ソース 検索 ヘルプ RSS ログイン

BugTrack-R備忘録/4

R備忘録 /状態空間モデリング/donlp2/その他のメモ

R備忘録 - 記事一覧

R(R言語)でバイナリ(たとえばJPEGなど)を標準出力に出力する方法

  • 投稿者: みゅ
  • カテゴリ: なし
  • 優先度: 普通
  • 状態: 完了
  • 日時: 2008年07月04日 18時25分33秒

内容

  • Rでバイナリ(たとえばJPEGなど)を標準出力に出力する方法があるとうれしい
    • CGIとして動かしたい?いいのだろうか・・・?
  • 一旦ファイルで作成したものを、perlなどで出力する方法はある
  • 今のところ、思いつかない・・・
postscript("", command="cat | pstopnm -stdout -ppm -nocrop | ppmtogif ")
plot(1:10)
dev.off()

とか.なぜか端が切れる.

pstopnm -stdout -ppm -xborder 0 -yborder 0 -xsize 600 -ysize 800 Rplots.ps |/usr/bin/pnmflip -rotate270 | ppmtogif > Rplot.gif

直接ファイルを変換する場合はうまくいく

gs -q -dSAFER -dBATCH -dNOPAUSE -sDEVICE=jpeg -sOutputFile=- Rplots.ps
gs -q -dSAFER -dBATCH -dNOPAUSE -sDEVICE=png16m -sPAPERSIZE=a4 \
-sOutputFile=Rplots.png SpaceStateModel/Rplots.ps
cat SpaceStateModel/Rplots.ps | gs -q -dSAFER -dBATCH -dNOPAUSE \
-sDEVICE=png16m -sPAPERSIZE=a4 -sOutputFile=Rplots.png -
cat SpaceStateModel/Rplots.ps | \
gs -q -dSAFER -dBATCH -dNOPAUSE -sDEVICE=png16m -sPAPERSIZE=a4 -sOutputFile=- - | \
pngtopnm | \
/usr/bin/pnmflip -rotate270 | ppmtogif > Rplot.gif
cat SpaceStateModel/Rplots.ps | \
gs -q -dSAFER -dBATCH -dNOPAUSE -sDEVICE=pnm -sPAPERSIZE=a4 -sOutputFile=- - | \
/usr/bin/pnmflip -rotate270 | pnmtopng 1>Rplots.png 2>/dev/null
$ LANG=C DISPLAY=mach:1.0 R --no-save --no-restore --slave << Eof 1>Rplots.png 2>/dev/null
> postscript("", command="cat | gs -q -dSAFER -dBATCH -dNOPAUSE -sDEVICE=pnm -sPAPERSIZE=a4 -sOutputFile=- - | /usr/bin/pnmflip -rotate270 | pnmtopng 2>/dev/null")
> plot(1:10)
> dev.off()
> q()
> Eof

リンク

コメント