r - 如何在 networkD3 的 sankeyNetwork 中为组着色？

Question

我的节点由名称和组组成，但我似乎无法在桑基图中为组实现不同的颜色。颜色要么全是蓝色，默认是全黑，要么使用下面的代码。

这是我使用的代码:

sankeyNetwork(        
Links = data$links,
Nodes = data$nodes,
Source= "source",
Target = "target",
Value = "weight",
NodeID = "names",
fontSize = 15,
NodeGroup = "group" 
))

这是我得到的输出:

Answer 1

NodeGroup Nodes 中的矢量数据框需要是非数字的。这从文档中并不明显。由于您没有提供您正在使用的数据，我们无法确定这是否是您遇到的问题，但在@john-friel 制作的示例中，这就是问题所在。这是一个工作示例，唯一的变化是 group向量被强制转换为字符向量...

library(networkD3)
source <- c(0,1,2,3,4,5)
target <- c(2,2,2,3,1,0)
value <- c(33,44,55,66,77,88)

sankeydata <- data.frame(source,target, value)

names <- c('a', 'b', 'c', 'd', 'e', 'f')
id <- c(0,1,2,3,4,5)
group <- as.character(c(1,1,1,2,2,2)) # this is the only line changed

sankeyNodes <- data.frame(names,id, group)


sankeyNetwork(Links = sankeydata, Nodes = sankeyNodes, Source = "source",
         Target = "target", Value = "value", NodeID = "names", 
         NodeGroup = "group", fontSize = 12, nodeWidth = 30)