关于rgl布局3D plot3d的问题

我正在尝试使用R中的rgl软件包为具有多个子情节的3d绘图添加一个整体标题，并且我还尝试设置两个子场景之间的距离。在2D绘图中，我们可以使用title（“我的title”，outer=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])
 }

rgl.视点（0,0，视野=0）
par3d（windowRect=c（50,50700700），缩放=0.8）
matrgl中没有外部区域的概念。您需要做的是将另一个区域添加到布局中，并将标题放在那里。比如说,

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")

库（rgl）
open3d（）
马特请检查您的代码，因为我在shade3d（shapes[[I]]，col=col[I]）中遇到
错误：未找到对象“shapes”
shapes非常感谢！！！我还有一个问题：如何调整两个形状之间的距离？例如，我想要两个形状闭合，怎么做？我不知道你在问什么。把一个单独的问题和示例代码放在一起，可能会有人回答。感谢@user2554330的最好方式是接受他的回答answer@user2554330我用你的代码画了一张图，图中有六个立方体，两个立方体之间的间距对我来说太大了，所以我希望间距变小。如何设置？