在三维空间中制作矢量动画

Question

我有一个关于矢量坐标随时间动画的问题，涉及到给定的 x、y 和 z 坐标。到目前为止，我在制作每行的输出和将它们组装成 .gif 上遇到了困难。rgl 矢量图：显示正交矢量的直角 我想要做的更接近于这个 球坐标系 视频。但我不需要旋转坐标系，只需要矢量随时间旋转就足够了。

这是一个关于 x、y 和 z 矢量的示例 df。

time <- seq(1,30,0.1)
x <- runif(291,-0.14,0.1)
y <- runif(291,-0.14,0.1)
z <-sort(runif(291,-0.9,0.9),decreasing=TRUE)

df <- data.frame(x,y,z,time)

library(matlib)
library(rgl)

vec <- rbind(diag(3), c(0.04,0.09,0.85))  # just for example.
rownames(vec) <- c("X", "Y", "Z", "J")
open3d()
vectors3d(vec, col=c(rep("black",3), "red"), lwd=2)

[[空间中的3D向量][2]][2]

- Alexander

---

@jenesaisquoi 是的。如何为给定的位置创建一个框架？ - Alexander

@jenesaisquoi 我在询问如何逐个将这些坐标放入 df 中以供 rgl.snapshot 使用？ - Alexander

Answer 1

请参考?movie3d中的示例。该函数旋转坐标系，但它可以执行您想要的任何操作，包括重新绘制整个场景。

- user2554330