关于rgl layout3d plot3d的注释

时间:2018-03-10 12:17:12

标签: r title rgl

我正在尝试使用R中的rgl包向具有多个子图的3d图添加整体标题,并且我还尝试设置两个子场景之间的距离。在2D情节中,我们可以使用标题("我的标题",外部= TRUE)来给出整体标题,并且" mar"设定保证金。那么,相应的参数是什么? 这是我的代码:

 rgl.viewpoint(0,0,fov=0)
 par3d(windowRect=c(50,50,700,700),zoom=0.8)
 mat<-matrix(c(1,2,3,4,5,6),3,2,byrow = TRUE)
 height<-c(2,2,2)
 width<-c(1,1)
 layout3d(mat, height = height,width=width,sharedMouse = TRUE)
 for (i in 1:6) {
    next3d()
    shade3d(shapes[[i]], col = col[i])
 }

我想在图片中添加标题并调整两个子图之间的距离。

1 个答案:

答案 0 :(得分:1)

rgl中没有外部区域的概念。您需要做的是在布局中添加另一个区域,并将标题放在那里。例如,

library(rgl)
open3d()
mat<-matrix(c(7,7,1,2,3,4,5,6),4,2,byrow = TRUE)
height<-c(1,2,2,2)
width<-c(1,1)
layout3d(mat, heights = height, widths=width, sharedMouse = TRUE)
for (i in 1:6) {
        next3d()
        shade3d(cube3d(), col = i)
}
next3d()
text3d(0,0,0,"My title")