2014-02-28 57 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窗口中打开。这就是为什么我没有看到任何东西。