用play3d实现R Markdown html中3d对象的动画

Question

有没有可能在R标记块中插入代码，以允许play3d在生成的html中对3d绘图进行动画处理？下面是一个标记示例：

```{r setup, include=FALSE}

库(Knitr)

库(Rgl)

knitr::opts_chunk$set(echo =真)

```{r, webgl = TRUE}

A <- merge(1:100,1:100，by=NULL)

A$z <- 0.5A$x - 0.5A$y

plot3d(x=A$x、y=A$y、z=A$z)

play3d(spin3d())

编织该文件会打开设备窗口，并按照指定的方式对平面进行动画处理，但是编织过程会挂起，直到用户在设备具有焦点时按下ESC；当这完成时，编织继续，并且所得到的html文件仅包含静态3d图(即，没有动画)。

在不提前保存电影的情况下，有没有一种方法可以在markdown html中设置plot3d对象的动画？

Answer 1

play3d纯粹是用来控制R中的rgl显示的。你需要这样的代码：

```{r setup, include=FALSE}

库(Knitr)

库(Rgl)

knitr::opts_chunk$set(echo =真)

```{r}

A <- merge(1:100,1:100，by=NULL)

A$z <- 0.5A$x - 0.5A$y

plot3d(x=A$x、y=A$y、z=A$z)

fn <- spin3d()

控制<- par3dinterpControl(fn，0，3，steps = 15)

rglwidget()循环播放小部件( step=0.01，%>%，step=0.01=真，速率= 0.5)

这将显示如下所示的显示：

​

​

您可以单击按钮来控制旋转。