řgWidgets在gWidgets2 ggraphics装置嵌入一个“RGL” 3D图(R gWi

我可以嵌入在gWidgets2 ggraphics设备中的“RGL” 3D绘图？ 例如，

library(gWidgets2)
library(rgl)

w <- gwindow("brushing example", visible=FALSE)
g <- ggroup(cont=w)
pg <- gnotebook(cont=g, expand=TRUE)
dev1 <- ggraphics(cont=pg)

visible(w) <- TRUE

visible(dev1) <- TRUE   
plot.new()  

x <- sort(rnorm(1000))
y <- rnorm(1000)
z <- rnorm(1000) + atan2(x,y)
plot3d(x, y, z, col=rainbow(1000))

我可以把gnotebook窗口中的3D图？

文章来源: R gWidgets embed a “rgl” 3D plot in gWidgets2 ggraphics device