我正在尝试使用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])
}
我想在图片中添加标题并调整两个子图之间的距离。
答案 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")