如何在椭球的上半部周围建立缓冲区？

Question

我正在寻找一种创建比示例中绘制的椭圆形更大的椭圆形的方法。因此，椭圆形应该像一个缓冲区，其绘制的宽度是特定的。

此外，我想“切除”椭圆体的上半部分。

有什么想法吗？

示例摘自：http://www.sthda.com/english/wiki/a-complete-guide-to-3d-visualization-device-system-in-r-r-software-and-data-visualization

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)