来自networkD3中的sankeyNetwork的图不显示输出既不会在R中生成任何警告/错误

问题描述 投票:1回答:1

我想生成一个Sankey图,使用来自sankeyNetwork()包中的来显示不同区域的运动。我试图尽可能完美地模仿一些例子。但是当我运行函数sankeyNetwork时,不会生成任何输出。最重要的是,R没有显示任何警告,错误等等。因此,我无法确定是否犯了错误(显然,因为没有生成情节)以及如何解决它们。我提供了一个示例df和下面的代码。

library(networkD3)

nodes <- data.frame(area = c("a", "b", "c", "d", "e", "f", "g", 
                            "h", "i", "j", "k", "l", "m", "n")) 

links2 <- data.frame(source = c(1, 1, 1, 1, 1, 2, 2, 2, 2, 2, 2, 2, 2, 3, 3, 3, 3, 3, 3, 4, 4, 4, 4, 4, 4,
                                 5, 5, 5, 5, 6, 6, 6, 6, 7, 7, 7, 7, 7, 7, 8, 8, 8, 9, 9, 9, 9, 10, 10, 11, 11, 11, 12, 13, 13), 
                     target = c(2, 8, 10, 11, 13, 0, 4, 5, 6, 7, 10, 11, 13, 0, 4, 9, 10, 12, 13, 0, 5, 6, 7, 10, 11, 13, 7, 10, 12, 
                     0, 10, 11, 12, 13, 8, 9, 10, 11, 12, 13, 9, 10, 13, 10, 12, 13, 0, 11, 12, 13, 0, 14, 0, 0), 
                     value  = c(14, 4, 6, 23, 3, 6, 36, 3, 4, 4, 3, 12, 3, 24, 3, 6, 19, 3, 9, 3, 6, 3, 11, 9, 3, 22, 3, 3, 10, 3, 4, 
                                3, 3, 9, 12, 5, 16, 13, 3, 10, 3, 4, 9, 7, 4, 4, 77, 4, 6, 6, 27, 3, 3, 3))

sankeyNetwork(Links = links2, Nodes = nodes,
              Source = "source", Target = "target",
              Value = "value", NodeID = "area",
              fontSize= 12, nodeWidth = 30) 
r data-visualization sankey-diagram htmlwidgets networkd3
1个回答
1
投票

您在links2数据框中引用了15个唯一节点,但在nodes数据框中只有14个唯一节点。

length(unique(c(links2$source, links2$target)))
# [1] 15
length(nodes$area)
# [1] 14

如果你添加另一个节点,它将工作...

library(networkD3)

nodes <- data.frame(area = c("a", "b", "c", "d", "e", "f", "g", 
                             "h", "i", "j", "k", "l", "m", "n", "o")) 

links2 <- data.frame(source = c(1, 1, 1, 1, 1, 2, 2, 2, 2, 2, 2, 2, 2, 3, 3, 3, 3, 3, 3, 4, 4, 4, 4, 4, 4,
                                5, 5, 5, 5, 6, 6, 6, 6, 7, 7, 7, 7, 7, 7, 8, 8, 8, 9, 9, 9, 9, 10, 10, 11, 11, 11, 12, 13, 13), 
                     target = c(2, 8, 10, 11, 13, 0, 4, 5, 6, 7, 10, 11, 13, 0, 4, 9, 10, 12, 13, 0, 5, 6, 7, 10, 11, 13, 7, 10, 12, 
                                0, 10, 11, 12, 13, 8, 9, 10, 11, 12, 13, 9, 10, 13, 10, 12, 13, 0, 11, 12, 13, 0, 14, 0, 0), 
                     value  = c(14, 4, 6, 23, 3, 6, 36, 3, 4, 4, 3, 12, 3, 24, 3, 6, 19, 3, 9, 3, 6, 3, 11, 9, 3, 22, 3, 3, 10, 3, 4, 
                                3, 3, 9, 12, 5, 16, 13, 3, 10, 3, 4, 9, 7, 4, 4, 77, 4, 6, 6, 27, 3, 3, 3))

sankeyNetwork(Links = links2, Nodes = nodes,
              Source = "source", Target = "target",
              Value = "value", NodeID = "area",
              fontSize= 12, nodeWidth = 30)

enter image description here

© www.soinside.com 2019 - 2024. All rights reserved.