networkD3 simpleNetwork 无法在 Shiny 中正确重新渲染答案

【问题标题】：networkD3 simpleNetwork not re-rendering properly in ShinynetworkD3 simpleNetwork 无法在 Shiny 中正确重新渲染
【发布时间】：2017-04-24 13:14:10
【问题描述】：

我希望基于单击 actionButton 来呈现和重新呈现 simpleNetwork 图。但是，由于某种原因，多次单击该按钮不会创建新的 simpleNetwork 实例，而是似乎使用了缓存版本。如何让 simpleNetwork 图表在多次点击时完全重新呈现？

我在下面提供了一个示例以及问题的 gif：

.gif of issue

library(shiny)
library(networkD3)

server <- function(input, output, session) {
  
  data <- eventReactive(input$click, {
    src <- c("A", "A", "A", "A", "B", "B", "C", "C", "D")
    target <- c("B", "C", "D", "J", "E", "F", "G", "H", "I")
    networkData <- data.frame(src, target)
  })
  
  output$simple <- renderSimpleNetwork({
    simpleNetwork(data())
  })
  
}

ui <- fluidPage(titlePanel("networkD3 + Shiny"),
                
                sidebarLayout(
                  sidebarPanel(actionButton("click", "Render")),
                  
                  mainPanel(simpleNetworkOutput(
                    "simple", width = "100%", height = "700px"
                  ))
                ))

shinyApp(ui = ui, server = server)

【问题讨论】：

标签： r shiny networkd3

【解决方案1】：

这已被报告here。它已通过PR #179 修复并在version 0.4 on CRAN 中发布。确保您的 networkD3 包已更新。

【讨论】：