Following this question (including a interactive 3D figure with knitr) and this example by Yihui (https://dl.dropboxusercontent.com/u/15335397/misc/webgl-rmd.html), I can include a 3D interactive figure in html output using knitr and Rmarkdown. But I would like to include a static figure in word/pdf output.
关于这个问题(包括一个带knitr的交互式3D图)和Yihui的这个例子(https://dl.dropboxusercontent.com/u/15335397/misc/webgl-rmd.html),我可以在html中包含一个3D交互式图形使用knitr和Rmarkdown输出。但我想在word / pdf输出中包含一个静态图形。
Is it possible to do this? Thanks for any suggestion.
是否有可能做到这一点?谢谢你的任何建议。
My sessionInfo
> sessionInfo()
R version 3.1.1 (2014-07-10)
Platform: x86_64-w64-mingw32/x64 (64-bit)
locale:
[1] LC_COLLATE=English_Australia.1252 LC_CTYPE=English_Australia.1252
[3] LC_MONETARY=English_Australia.1252 LC_NUMERIC=C
[5] LC_TIME=English_Australia.1252
attached base packages:
[1] stats graphics grDevices utils datasets methods base
other attached packages:
[1] rgl_0.95.1158 knitr_1.8
loaded via a namespace (and not attached):
[1] evaluate_0.5.5 formatR_1.0 stringr_0.6.2 tools_3.1.1
1 个解决方案
#1
8
You could use the following setup to switch according to the output format
您可以使用以下设置根据输出格式进行切换
```{r, echo=FALSE}
out_type <- knitr::opts_knit$get("rmarkdown.pandoc.to")
keep <- if(out_type == "html") 'none' else 'last'
```
```{r chunk, echo=FALSE, fig.keep=keep}
plot(cars)
if(out_type == "html")
cat("there goes fancy js code")
```
#1
8
You could use the following setup to switch according to the output format
您可以使用以下设置根据输出格式进行切换
```{r, echo=FALSE}
out_type <- knitr::opts_knit$get("rmarkdown.pandoc.to")
keep <- if(out_type == "html") 'none' else 'last'
```
```{r chunk, echo=FALSE, fig.keep=keep}
plot(cars)
if(out_type == "html")
cat("there goes fancy js code")
```