R gWidgets在gWidgets2 ggraphics设备中嵌入了一个“rgl”3D图

Question

我可以嵌入＆＃34; rgl＆＃34; gWidgets2 ggraphics设备中的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))

我可以将3D绘图放在gnotebook窗口中吗？