Question

在rPubs中发布了以下rPresentation代码。某些图表无法正常显示。只是想知道我错过了什么？这方面的指导会有所帮助。谢谢演示文稿的链接：http://rpubs.com/shan/Presentation3

 Charts

 ========================================================

 ### Lets display some charts.

  ```{r results = 'asis', comment = NA}
  library(rCharts)
  library(ggplot2)
   n1 <- nPlot(carat ~ cut , group = "color", data = diamonds[1:40,], type = "multiBarChart")
   n1
  ```

  Plot

 =============================================================

 ### Plotting Chart from economics dataset

 ```{r results = 'asis', comment = NA}

 library(rCharts)
 data(economics, package = 'ggplot2')
 econ <- transform(economics, date = as.character(date))
 m1 <- mPlot(x = 'date', y = c('psavert', 'uempmed'), type = 'Line',data = econ)
 m1$set(pointSize = 0, lineWidth = 1)
 m1
 ```

 Plot

============================================================

 ### Lets plot some Geographical Data
 ```{r gvisMergeExample, results='asis', echo=FALSE}
 library(googleVis)
 Geo <- gvisGeoChart(Exports, locationvar='Country', colorvar='Profit',
 options=list(height=300, width=350))
 Tbl <- gvisTable(Exports, options=list(height=300, width=200))
 plot(gvisMerge(Geo, Tbl, horizontal=TRUE))
 ```

 Plot

 =========================================

 ### Lets plot Fruit vs Year
 ```{r MotionChartExample, results='asis', tidy=FALSE}
 library(googleVis)
 M <- gvisMotionChart(Fruits, 'Fruit', 'Year', options=list(width=400, height=350))
plot(M)
```

发布rPresentation slidedeck时出错

0 个答案: