我有一个g
像这样命名的 igraph (R) 图形对象:
IGRAPH UNW- 6 5 --
+ attr: name (v/c), weight (e/n)
+ edges (vertex names):
[1] 1--4 1--5 1--6 4--2 3--5
我像这样在它上面运行集群:
c1 <- cluster_fast_greedy(g)
然后我将它转换为一个 hclust 对象,如下所示:
hc <- as.hclust(c1)
此时检查标签会产生:
> hc$labels
[1] "1" "4" "3" "5" "6" "2"
然后使用networkD3,我将其转换为radialNetwork
rad <- as.radialNetwork(hc)
我用(例如)绘制它:
D3graph <- radialNetwork(List = rad,
fontSize = 10,
opacity = 0.8,
margin=1,
fontFamily = "sans-serif",
nodeColour = "grey",
nodeStroke = "white"
)