2014-02-28 56 views
1

來自實施例(surface3d)採取了以下的代碼產生什麼:Surface3D在RStudio中工作嗎?

library(rgl) 
data(volcano) 

z <- 2 * volcano  # Exaggerate the relief 

x <- 10 * (1:nrow(z)) # 10 meter spacing (S to N) 
y <- 10 * (1:ncol(z)) # 10 meter spacing (E to W) 

zlim <- range(y) 
zlen <- zlim[2] - zlim[1] + 1 

colorlut <- terrain.colors(zlen) # height color lookup table 

col <- colorlut[ z-zlim[1]+1 ] # assign colors to heights for each point 

open3d() 
surface3d(x, y, z, color=col, back="lines") 
+0

我沒有看到在你的代碼庫調用來加載具有這些功能的軟件包。 –

+0

在open3d調用之前,在代碼中添加'require(rgl)'代碼可以在常規Mac GUI控制檯和RStudio中都成功。 –

+0

適合我。一個新的RGL設備打開。 – EDi

回答

0

問題解決了。 rgl設備確實已經在連接到不同「桌面」的X11窗口中打開。這就是爲什麼我沒有看到任何東西。