web-dev-qa-db-ja.com

エッジ属性に従ってigraphプロットRのエッジの厚さを変更します

Edge.betweennessスコアに対応するようにグラフのエッジ幅を変更したいと思います。

 net <- read.csv("D:/SNA/R/Net.csv")
 att <- read.csv("D:/SNA/R/Att.csv")
 g <- graph.data.frame(net, vertices=att, directed=TRUE)
 pdf("Network.pdf", pointsize=8)
 plot(g, vertex.label=NA, vertex.size=3, Edge.width=Edge.betweenness(g))
 dev.off()

また、エッジの重みとしてエッジ間スコアを作成し、それを次のようにプロット関数のEdge.width引数に割り当ててみました。

plot(g, vertex.label=NA, vertex.size=3, Edge.width=E(g)$width
13
P Mcquiy

あなたの例はうまくいくはずです。または、次のように書くこともできます

E(g)$weight <- Edge.betweenness(g)

プロット関数の前。

11
Piotr Migdal