RStudio 中 ioslides 中的 persp3d 未显示

Question

是否可以将persp3d图表输入到RStudio中的ioslides演示中？我正在使用下面的代码绘制不同年龄和年份的对数死亡率，但未显示图表。

在幻灯片外生成图表有效。如果可能的话，我希望在演示文稿中有一个交互式图表。

```{R, echo = FALSE}
library(rgl)
library(demography)

# get data
plDemo<-hmd.mx("POL", username=username, password=password)

qxt <- log(plDemo$rate[[3]])
years <- plDemo$year
ages<- plDemo$age

persp3d(ages[0:100], years, qxt[0:100,], col="skyblue", shade=TRUE,xlab="Ages (0-100)",
    ylab="Years",zlab="Mortality rate (log)")
```

提前感谢您的帮助。

Answer 1

最后我找到了答案：

```{r setup, results='asis', echo=FALSE, warning=FALSE}
library(knitr)
library(rgl)
knit_hooks$set(webgl = hook_webgl)
knitr::opts_chunk$set(cache=FALSE)
```
```{R, testgl, webgl=TRUE, echo=FALSE,  fig.height=5, warning=FALSE}
persp3d(ages[0:100], years, log(qxt)[0:100,], col="skyblue", shade=TRUE,xlab="Ages (0-100)",
        ylab="Years",zlab="Mortality rate (log)")
```

RStudio 中 ioslides 中的 persp3d 未显示

persp3d in ioslides in RStudio not shown

3d

charts

rstudio