0
library(plot3D)
data(iris)
x <- sep.l <- iris$Sepal.Length
y <- pet.l <- iris$Petal.Length
z <- sep.w <- iris$Sepal.Width
CI <- list(z = matrix(nrow = length(x),
                      data = rep(0.1, 2*length(x))))
par(mfrow = c(1, 1))
scatter3D(x, y, z, phi = 0, bty = "g", col = gg.col(100), 
          pch = 18, CI = CI)

运行上面的代码给了我一个散点图,但我似乎无法与之交互。

在此处输入图像描述

我知道包中的plot3d函数rgl确实具有交互式 3D 图,但我没有看到添加置信区间的选项。

library(rgl)
open3d()
plot3d(x, y, z, col = rainbow(1000))

有没有办法使用 CI 创建交互式 3D 图?

4

0 回答 0