3

Rのrglパッケージ（plot3dおよびmovie3d関数）によって生成されたgif画像の解像度を上げる方法-外部またはRを介して？

Rコード：

MyX<-rnorm(10,5,1)
MyY<-rnorm(10,5,1)
MyZ<-rnorm(10,5,1)
plot3d(MyX, MyY, MyZ, xlab="X", ylab="Y", zlab="Z", type="s", box=T, axes=F)
text3d(MyX, MyY, MyZ, text=c(1:10), cex=5, adj=1)
movie3d(spin3d(axis = c(0, 0, 1), rpm = 4), duration=15, movie="TestMovie",
                                                type="gif", dir=("~/Desktop"))

出力：

出力 アップデート

コードの先頭にこの行を追加すると、問題が解決しました

r3dDefaults$windowRect <- c(0, 100, 1400, 1400)
4

1 に答える 1

4

gif自体の解像度についてはあまりできないと思います。代わりに画像をもっと大きくする必要があると思います。それから小さく表示すると見栄えが良くなります。最近のアップグレードで1つか2つ壊れたため、これはテストされていませんが、2.15では機能しました。

par3d(windowRect = c(0, 0, 500, 500)) # make the window large
par3d(zoom = 1.1) # larger values make the image smaller

# you can test your settings interactively at this point

M <- par3d("userMatrix") # save your settings to pass to the movie

movie3d(par3dinterp(userMatrix=list(M,
    rotate3d(M, pi, 1, 0, 0), 
    rotate3d(M, pi, 0, 1, 0) ) ), 
    duration = 5, fps = 50,
    movie = "MyMovie")

HTH。うまくいかない場合は、使用している機能を確認し、設定を調整してください。

于 2013-01-23T12:39:30.253 に答える