2017-04-24 1 views
1

Shiny 앱에 senkey 다이어그램 (networkD3)과 sunburst 다이어그램 (sunburstR)을 포함하려고하는데, 내가 함께 할 때 일한다. 그러나 Sankey 다이어그램 만 표시되지만 오류는 발생하지 않습니다. 누구도 같은 경험을 했습니까?NetworkD3 (Sankey) 및 sunburstR (Sanburst) 패키지를 Shiny 앱에서 함께 사용할 수 없습니다.

정말 도움을 주시면 감사하겠습니다.

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

pls는 완전히 재현 할 수있는 예를 제공합니다. 'Links','Nodes' 등 – BigDataScientist

+0

문제의 원인은 networkD3이 D3v4로 업데이트되었고 sunburstR이 여전히 D3v3을 사용하고 있다는 것입니다. 어쨌든 사용자 측에서이를 해결하는 방법을 알지 못합니다. 실제로, 제가 생각할 수있는 유일한 해결책은 현재 네트워크 D3을 <0.3으로 다운 그레이드하는 것입니다. 우리는 이것을 D3v4로 업그레이드했습니다. –

답변

관련 문제