r - 如何使用 rgl 绘制虚线/虚线

Question

我正在尝试使用 rgl 绘制一些 3d 形状，但我想使用虚线/点线连接我的点。我怎样才能做到这一点？目前我有

require(rgl)

p1 <- c(0,0,0)
p2 <- c(1,0,0)
p3 <- c(1,1,0)
p4 <- c(0,1,0)
p5 <- c(0.5,0.5,0.5)

mat <- cbind(p1,p2,p3,p4,p1,p5,p2,p5,p3,p5,p4)
x <- as.numeric(mat[1,])
y <- as.numeric(mat[2,])
z <- as.numeric(mat[3,])

plot3d(x,y,z,type="l",lwd=2,lty=3,box=FALSE,axes=FALSE,xlab="",ylab="",zlab="")

所以lwd有效，但lty没有。我也试过lty="dashed"了，但没有用。

我本质上想绘制可以绘制的 3d 形状

1. 轻松旋转/缩放（就像 rgl 给出的那样）
2. 导出为矢量图形格式（如 rgl.postscript）
3. 指定线型和颜色

如果有另一个包可以实现这一点，也请分享。谢谢。

Answer 1

我认为你可以用 rgl 包做的最好的就是顶点作为点：

vertices <- c(t(cbind(x,y,z,1)))
indices <- seq_along(x)
dot3d( qmesh3d(vertices,indices) )