包括googleVis图表中ioslides RStudio

Question

我有一个如下图：

library(googleVis) 
df = data.frame(models = c("PLAT", "LC", "APC", "CBD", "M6", "M7", "M8"), val = 1:7) 
Column <- gvisColumnChart(df) 
plot(Column) 

我想将其放置在RStudio ioslides。 任何人都可以指导我如何做到这一点？

Answer 1

关键是要使用options(gvis.plot.tag='chart')作为代码的一部分，这指示plot()函数只输出图表的html代码。下面是代码：

## Another GoogleVis Slide 

Some text in slide 

```{r warning=FALSE, message=FALSE, results='asis', tidy=FALSE} 
library(googleVis) 

op <- options(gvis.plot.tag = 'chart') 

df = data.frame(models = c("PLAT", "LC", "APC", "CBD", "M6", "M7", "M8"), val = 1:7) 
Column <- gvisColumnChart(df) 
plot(Column) 
``` 

您可以通过键入?plot.gvis发现这一点，但我认为这并不明显，所以希望有人会通过阅读这个答案节省一些时间