Inclusione di una figura interattiva 3D in html e statica in word/pdf utilizzando knitr e rgl

Question

Dopo questa domanda (including a interactive 3D figure with knitr) e questo esempio di Yihui (https://dl.dropboxusercontent.com/u/15335397/misc/webgl-rmd.html), è possibile includere una figura interattiva 3D nell'output HTML utilizzando knitr e Rmarkdown. Ma vorrei includere una figura statica in output word/pdf.

È possibile farlo? Grazie per qualsiasi suggerimento.

mio 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 

Answer 1

è possibile utilizzare la seguente configurazione per passare in base al formato di uscita

```{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") 
```