2017-04-24 75 views
1

我試圖在Shiny應用中包含senkey圖(networkD3)和sunburst圖(sunburstR),但是我發現它沒有當我把它們放在一起時工作。但是,我不會收到任何錯誤,但只顯示Sankey圖表。有沒有人有過相同的經歷?networkD3(Sankey)和sunburstR(Sanburst)包不能在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);") 
       ) 
    }) 
} 
+2

請提供一個完全可重複的例子,包括。 'Links','Nodes'等。 – BigDataScientist

+0

問題的原因是網絡D3已經更新爲D3v4,而sunburstR仍在使用D3v3。無論如何,我不知道在用戶方面解決它。實際上,我能想到的唯一解決方案就是將網絡D3降級到版本低於0.3的版本,這是我們升級到D3v4時的版本。 –

回答