我正在寻找的是一种创建比示例中绘制的更大的椭圆体的方法。所以椭圆体应该像一个缓冲区,具有特定宽度的绘图。
此外,我想“切断”椭圆体的上部。
知道怎么做吗?
library("rgl")
data(iris)
head(iris)
x <- sep.l <- iris$Sepal.Length
y <- pet.l <- iris$Petal.Length
z <- sep.w <- iris$Sepal.Width
rgl_init()
plot3d(x, y, z, col="blue", box = FALSE,
type ="s", radius = 0.15)
ellips <- ellipse3d(cov(cbind(x,y,z)),
centre=c(mean(x), mean(y), mean(z)), level = 0.99)
plot3d(ellips, col = "blue", alpha = 0.2, add = TRUE, box = FALSE)