1

我有一个网络，我用之前的分析对每个节点进行了表征-并分配了如下颜色：

plot.igraph(g, layout=layout.fruchterman.reingold(g), vertex.color=node_colors, vertex.label = node_names)

变量 'node_colors' 是一个从先前分析中生成的向量，以便颜色与顶点放置/聚类一致。

在此处输入图像描述

但是，当我尝试在 networkD3 中实现个性化着色方案时，我收到“未使用的参数”错误：

data<-igraph_to_networkD3(g, group = members)
forceNetwork(Links = data$links, Nodes = data$nodes, Source = 'source', Target = 'target', NodeID = 'value', Nodesize = 'size', Group = "group", colourScale=node_colors, zoom = T, legend = T, opacityNoHover = TRUE)

错误：警告：forceNetwork 中的错误：未使用的参数（colorScale = node_colors）

NetworkD3 似乎只是创建了自己的配色方案......所以当我省略参数时：'colorScale=node_colors'，我得到以下信息：

在此处输入图像描述

但正如您所见，颜色与 igraph 图的颜色不同步。

有谁知道如何在networkD3中创建个性化的配色方案（包含一系列颜色的矢量）

4

1 回答 1

4

JS()您可以使用 networkD3 包附带的函数传递 Javascript 代码。在 Javascript 中，您可以使用十六进制代码来指定颜色。这是一个例子：

YourColors <- 'd3.scaleOrdinal().range([ "#FFA500", "#4169E1",  "#32CD32",
                                         "#FFC0CB", "#8A2BE2", "#FF6347"]);'

forceNetwork(Links = data$links, Nodes = data$nodes, 
             Source = 'source', Target = 'target', 
             NodeID = 'value', Nodesize = 'size', Group = "group",
             ######################### 
             colourScale = JS(YourColors), 
             #########################
             zoom = T, legend = T, opacityNoHover = TRUE)

如果要将特定颜色与特定变量联系起来，可以使用

    YourColors <- 'd3.scaleOrdinal()
                  .domain(["variable1", "variable2", "variable3"])
                  .range(["#7FFF00", "#A52A2A", "#E6E6FA"])'
于 2017-04-14T15:14:37.813 回答