スポンサーサイト

上記の広告は1ヶ月以上更新のないブログに表示されています。
新しい記事を書く事で広告が消せます。

first bunny

bunny <- read.delim("bun000.ply",skip=25,header=F, sep=" ")
bunny <- bunny[,c(1,2,3)]
bunny <- bunny[bunny[,1]!=1,]
points3d(bunny[,1],bunny[,2], bunny[,3],col="#9E0200",size=0.1)

library(rgl)
points3d(bunny[,1],bunny[,2], bunny[,3],col="#9E0200",size=0.1)
for(i in 1:360) {
rgl.viewpoint(i,10)
rgl.postscript(filename = paste("bunny",i,".eps",sep=""), fmt = "eps")
}

bunny.gif


epsファイルのpng形式への一括変換
mogrify -density 100 -format png *.eps

C:\Program Files\Giam
Giamにコマを追加するときは、*1~9.pngを先に、次に*10~99.pngを、次に*100~999.pngを追加していく。
スポンサーサイト

コメントの投稿


非公開コメント

コメント

Profile

zoa

Author:zoa
Metropolis (1927)

Calendar
05 | 2017/06 | 07
- - - - 1 2 3
4 5 6 7 8 9 10
11 12 13 14 15 16 17
18 19 20 21 22 23 24
25 26 27 28 29 30 -
Labels
Admin
Previous Posts
Recent Comments
Recent Trackback
Archive
このページのトップへ
上記広告は1ヶ月以上更新のないブログに表示されています。新しい記事を書くことで広告を消せます。