如何在R中绘制3D图中的多个2d图？

install.packages("rgl")  # 用于创建3D图形
install.packages("scatterplot3d")  # 用于创建散点图

library(rgl)
library(scatterplot3d)

open3d()

# 创建一个散点图
x <- rnorm(100)
y <- rnorm(100)
z <- rnorm(100)
scatterplot3d(x, y, z, color = "blue", pch = 16)

# 添加其他2D图形
# 例如，添加一个平面
plane3d(a = 1, b = 2, c = 3, d = 4, alpha = 0.5, color = "red")

# 添加一个线条
segments3d(x = c(0, 1), y = c(0, 1), z = c(0, 1), color = "green")

# 添加一个球体
sphere3d(radius = 0.5, color = "yellow")

# 调整坐标轴范围
xlim3d(-2, 2)
ylim3d(-2, 2)
zlim3d(-2, 2)

# 调整视角
rgl.viewpoint(theta = 120, phi = 30, fov = 60, zoom = 0.8)

rgl.close()