小编Yan*_*ltz的帖子

我正在开发一个 R 闪亮应用程序，它使用多个 html 小部件，特别是networkD3、d3heatmap和chorddiag。

这些小部件单独工作正常。但是，在同一页面中使用它们会在它们应该出现的地方留下空白。

这是显示错误的可重现代码。在 UI 中注释绘图行，您将看到绘图出现和消失..

我非常感谢你的帮助！

# libraries
library(shiny)
library(d3heatmap)
library(chorddiag)
library(networkD3)

# Server
server <- function(input, output) {

  # create heatmap
  output$heatmap <- renderD3heatmap({
    d3heatmap(mtcars, scale = "column", colors = "Spectral")
  })

  # create chord diagram
  output$chord <- renderChorddiag({
    m <- matrix(c(11975,  5871, 8916, 2868,1951, 10048, 2060, 6171, 8010, 16145, 8090, 8045,1013,   990,  940, 6907),
    byrow = TRUE, nrow = 4, ncol = 4)
    haircolors <- c("black", …