6

我有一个简单的 sankey 图，使用networkD3闪亮应用程序中的包生成。如何对source和/或target节点进行排序？

正如您在 MWE 中看到的，默认情况下，源节点（A、B、C、D、E）和目标节点（V、W、X、Y、Z）都没有排序。至少，排序对我来说是不理解的。

桑基图

代码：

library("shiny")
library("networkD3")

ui <- fluidPage(
  column(3),
  column(6, sankeyNetworkOutput("mySankeyD")),
  column(3)
)

server <- function(input, output) {
  output$mySankeyD <- renderSankeyNetwork({
    myDf <- list(
      nodes=data.frame(name=c( "A", "B", "C", "D", "E",
                               "V", "W", "X", "Y", "Z")),
      links=data.frame(source=as.integer(c(0, 1, 2, 3, 3, 4, 4)),
                       target=as.integer(c(7, 6, 7, 8, 7, 5, 9)),
                       value =           c(1, 4, 1, 5, 1, 5, 3)
      )
    )

    sankeyNetwork(Links = myDf$links, Nodes = myDf$nodes, Source = "source",
                  Target = "target", Value = "value", NodeID = "name",
                  units = "TWh", fontSize = 25, nodeWidth = 30, fontFamily = "sans-serif", iterations = 30)
  })
}

shinyApp(ui, server)

如何sankeyNetwork()确定节点的顺序？是否可以按字母顺序对它们进行排序？

我想对源节点进行排序，如果可能的话，还要对目标节点进行排序。

编辑 正如@emilliman5 在评论中指出的那样，无法手动对节点进行排序。

因此，是否有其他 R 包可以生成允许对节点进行排序的 sankey 图？如果是，该怎么做？

4

1 回答 1

16

设置iterations = 0在里面sankeyNetwork()就可以了。现在节点的绘制顺序与节点数据框中的顺序相同。

library("networkD3")

myDf <- list(
    nodes=data.frame(name=c( "A", "B", "C", "D", "E",
                             "V", "W", "X", "Y", "Z")),
    links=data.frame(source=as.integer(c(0, 1, 2, 3, 3, 4, 4)),
                     target=as.integer(c(7, 6, 7, 8, 7, 5, 9)),
                     value =           c(1, 4, 1, 5, 1, 5, 3)
    )
)

sankeyNetwork(Links = myDf$links, Nodes = myDf$nodes, Source = "source",
              Target = "target", Value = "value", NodeID = "name",
              units = "TWh", fontSize = 25, nodeWidth = 30, 
              fontFamily = "sans-serif", iterations = 0)
于 2017-09-14T17:48:05.107 回答