【发布时间】：2017-04-24 07:27:07
【问题描述】：
我正在尝试将 senkey 图 (networkD3) 和 sunburst 图 (sunburstR) 包含到 Shiny 应用程序中，但是当我将它们放在一起时发现它不起作用。我没有收到任何错误，但只显示了桑基图。有没有人有同样的经历？
如果您能提供任何帮助，我将不胜感激。
这里是 R 代码：
library(shiny)
library(shinydashboard)
library(lubridate)
library(dplyr)
library(tidyr)
library("sunburstR")
library("D3partitionR")
library("networkD3")
library("visNetwork")
ui.R
ui <- fluidPage(
tabItem(tabName = "Sunburst",
fluidPage(
fluidRow(
sunburstOutput("sunburst")
)
),
tabItem(tabName = "Sankey",
fluidPage(
fluidRow(
sankeyNetworkOutput("sankey")
)
)
)
)
)
server.R
server <- function(input, output, session) {
output$sunburst <- renderSunburst({
add_shiny(sunburst(sequence))
})
output$sankey <- renderSankeyNetwork({
invalidateLater(100, session)
sankeyNetwork(Links = Links, Nodes = Nodes,
Source = "Source2", Target = "Target2",
Value = "Value", NodeID = "name",
colourScale = JS("d3.scaleOrdinal(d3.schemeCategory20);")
)
})
}
【问题讨论】：
-
请提供一个完全可重现的例子，包括。
Links、Nodes等 -
问题原因是networkD3已经更新到D3v4，sunburstR还在使用D3v3。我不知道无论如何要在用户端解决它。实际上，我目前能想到的唯一解决方案是将networkD3降级到
标签： r shiny sankey-diagram sunburst-diagram networkd3