r - R Shiny + r2d3 包 - 不渲染图表

Question

我一直在尝试使用 r2d3 包和 RShiny 渲染图表。代码运行没有错误，但图表没有显示。D3 可视化在 R 之外实现时有效。有人可以帮我让这个特定的图表工作吗？

我的 app.R 代码如下

library(shiny)
library(r2d3)

ui <- fluidPage(

  d3Output("d3")
)

server <- function(input, output) {
  output$d3 <- renderD3({
    r2d3(
      #runif(5, 0, input$bar_max),
      data=data_C,
      script = system.file("examples/mult2.js" , package = "r2d3", d3_version = c("3"))
    )
  })
}

shinyApp(ui = ui, server = server)

在 .js 文件中，我替换了

d3.tsv("data.tsv", function(error, data) {
  color.domain(d3.keys(data[0]).filter(function(key) { return key !== "date"; }));

和

d3.tsv(r2d3.data, function(error, data) {
  color.domain(d3.keys(data[0]).filter(function(key) { return key !== "date"; }));

基于r2d3 页面中的示例。页面底部显示的动画条形图示例对我来说非常有用。但这张图表没有。任何帮助将不胜感激