如何在R中的RGL场景中使用特定坐标添加shade3d对象？

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）。