r - 将平面添加到 scatterplot3d

Question

我有一个直线方程

y=sqrt(c+x^2)

我想在 3d 散点图中添加一个平面，这样我的平面垂直于 xy 平面，上面给出的线是两个平面的交线。

我该怎么做呢？我不太明白plane3d 是如何工作的。我已阅读 http://svitsrv25.epfl.ch/R-doc/library/scatterplot3d/html/scatterplot3d.html

但是还是没明白。

Answer 1

这可能是您正在寻找的:

library(scatterplot3d)
# y=sqrt(a+x^2) with x in (-0.5,0.5), z in (0,1) and a=0
a <- 0
x <- rep(seq(-0.5, 0.5, length = 200), each = 200)
y <- sqrt(a + x^2)
z <- rep(seq(0, 1, length = 200), 200)
scatterplot3d(x, y, z, highlight.3d = TRUE, pch = 20)

编辑:这将有助于了解您如何添加这些其他点，但让我们以 ?scatterplot3d 中的第二个示例为例。

  temp <- seq(-pi, 0, length = 50)
  x2 <- c(rep(1, 50) %*% t(cos(temp)))
  y2 <- c(cos(temp) %*% t(sin(temp)))
  z2 <- c(sin(temp) %*% t(sin(temp)))

现在合并 x与 x2和其他人做同样的事情，我们得到:

scatterplot3d(c(x,x2), c(y,y2), c(z,z2), highlight.3d = TRUE, pch = 20)