Question

我正在使用d3pie rChart。它在我在rStudio查看器中查看时有效。当我尝试将其输入闪亮的应用程序时，我收到错误：

addResourcePath（LIB $ name，LIB $ url）出错：找不到对象'LIB'

它希望我告诉它我在showOutput（'chart1'，'LIB'）中使用的库（例如，Nvd3，Highcharts），但我不确定使用哪个库。

同样，当我将d3pie图表保存为html文件时，它将无法在我的浏览器中打开。有办法解决这个问题吗？

数据：

x <- data.frame(table = as.factor(c("A","B","C","D","E","F")), 
     value = c(518,39,337,304,56,7))

d3pie的代码：

require(magrittr)
require(dplyr)
require(rCharts)
rPie <- rCharts$new()
rPie$setLib("http://timelyportfolio.github.io/rChartsExtra/d3pie")
rPie$addParams(
  chartspec = list(
    header = list(
      title = list(
        text = "Breakdown of 2014 Revenue Sources"
      )
    )
    ,data = list(
      content = x
    )
  )
)
rPie

server.R：

require(rCharts)
require(reshape)
require(magrittr)
require(dplyr)

x <- data.frame(table = as.factor(c("A","B","C","D","E","F")), 
                value = c(518,39,337,304,56,7))

shinyServer(function(input, output) {
  output$chart1 <- renderChart2({
    rPie <- rCharts$new()
    rPie$setLib("http://timelyportfolio.github.io/rChartsExtra/d3pie")
    cat(add_lib_assets(rPie$lib,cdn=T))
    rPie$addParams(
      chartspec = list(
        header = list(
          title = list(
            text = "This is the title"
          )
        )
        , data = list(
          content = x
        )
      )
    )
    rPie$set(dom = "chart1")
    return(rPie)
  })
})

ui.R：

require(rCharts)

shinyUI(fluidPage(
  titlePanel("Shiny App"),

  mainPanel(
               showOutput('chart1')
      ) 
    )
  )

Answer 1

要使其在shiny中有效，您需要在d3pie中添加showOutput作为lib：

showOutput('chart1','d3pie')

您还要下载extra libraries并将d3pie文件夹复制/粘贴到与server.R和ui.R相同的文件夹中。

rCharts d3pie没有出现在闪亮的应用程序中

1 个答案: