0

ソーシャル ネットワークが時間とともにどのように変化するかを示したいと思います。私はigraphを使用しています。

問題は、ソーシャル ネットワーク内の期間のグラフ表現を作成するたびに、作成されたグラフごとにプログラムが頂点を異なる位置に配置することです。これは、ソーシャル ネットワーク グループが時間の経過とともにどのように継続/廃止されるかを示そうとしているためです。

入力してから作成する後続の各グラフにl<-layout.fruchterman.reingold(g)使用して、頂点の位置を指定しようとし ました。layout=lただし、次のようなエラー メッセージが表示されます。

Error in layout[v, , drop = FALSE] : subscript out of bounds

私が使用しているコードは次のとおりです。

    require(igraph)
cat<-read.csv(file="Bigplayers_3_36505-36605 - Copy.csv",header=F,sep=",")
cat<-as.matrix(cat)
set.seed(230)
g <- graph.adjacency(cat, weighted=T, mode = "undirected")
g2<-V(g)[degree(g)<1]
g<-delete.vertices(g,g2)
fg<-cluster_fast_greedy(g,merges=T,modularity=T,membership=T)
colors<-rainbow(max(membership(fg)))
V(g)$label<-V(g)$name
plot(g,vertex.size=10,vertex.color=colors[membership(fg)],mark.groups=communities(fg),layout=layout.fruchterman.reingold, main='Enron Email Dataset', vertex.label.dist=0.5, vertex.frame.color='blue', vertex.label.color='black', vertex.label.font=1)

異なる時間枠で同じ頂点を表す 2 つのデータセットを次に示します:こことここ

4

1 に答える 1

0

この問題を解決するには、行を削除する必要がありました

g2<-V(g)[degree(g)<1]
g<-delete.vertices(g,g2)

これらの線がなくなると、使用するデータセットに関係なく、頂点は同じ位置に留まります。

于 2015-10-24T18:23:42.607 に答える