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 形状

轻松旋转/缩放(就像 rgl 给出的那样)

导出为矢量图形格式(如 rgl.postscript)

指定线型和颜色

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

Answer 1

我认为你可以用 rgl 包做的最好的事情是将顶点作为点:

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