如何将使用特定坐标的 shade3d 对象添加到 R 中的 rgl 场景？

Question

我有一个 3d 模型（在本例中是锤头鲨）已加载：

shark3d= readOBJ("19412_Hammerhead_Shark_v2.OBJ")

此 3d 对象已使用以下方法成功添加到 rgl 场景：

shade3d(shark3d, material = list(col = "darkgray"))

但是，我想将这个 shade3d 对象添加到 rgl 场景中的特定坐标。

感谢您的帮助。

Answer 1

您可以使用 translate3d 和相关函数在场景中四处移动 "mesh3d" 对象。例如，

shade3d(translate3d(shark3d, x = 10, y = 20, z = 30),
        material = list(col = "darkgray"))

或

shark3d %>% 
  translate3d(x = 10, y = 20, z = 30) %>% 
  shade3d(material = list(col = "darkgray"))

会将形状的 (0,0,0) 坐标移动到 (10,20,30)。

How can I add a shade3d object using specific coordinates to an rgl scene in R?