r - 在 3D 中绘制两点之间的线

我正在编写一个回归算法，试图“捕获”框内的点。该算法试图使框尽可能小，因此通常框的边/角经过点，这决定了框的大小。

问题:我需要 R 中框的图形输出。在 2D 中很容易用 segments() 绘制框，它在两点之间画一条线。所以，我可以用 4 段画一个框:

plot(x,y,type="p")
segments(x1,y1,x2,y2)

然后我尝试了 scatterplot3d 和 plot3d 包进行 3D 绘图。在 3D 中，segments() 命令不起作用，因为没有额外的 z 分量。我很惊讶(对我来说)显然 segments() 在 3D 中没有足够的替换

在三个维度上绘制时，是否有一种简单的方法可以在两点之间绘制框/线？

最佳答案

scatterplot3d 函数返回的信息将允许您将 (x,y,z) 点投影到相关平面，如下所示:

library(scatterplot3d)
x <- c(1,4,3,6,2,5)
y <- c(2,2,4,3,5,9)
z <- c(1,3,5,9,2,2)
s <- scatterplot3d(x,y,z)

## now draw a line between points 2 and 3
p2 <- s$xyz.convert(x[2],y[2],z[2])
p3 <- s$xyz.convert(x[3],y[3],z[3])
segments(p2$x,p2$y,p3$x,p3$y,lwd=2,col=2)

rgl 包是另一种方法，也许更简单(注意 segments3d 从向量中成对获取点)

plot3d(x,y,z)
segments3d(x[2:3],y[2:3],z[2:3],col=2,lwd=2)

关于r - 在 3D 中绘制两点之间的线，我们在Stack Overflow上找到一个类似的问题：https://stackoverflow.com/questions/13495502/