r - 固定次数のスモール ワールド ネットワークの生成

Question

次数が 10 に固定されたスモール ワールド ネットワークを生成したいと考えています。

私は watts.strogatz.game(1, 100, 5, 0) を試しましたが、その結果、次数は 10 になりましたが、各ノードの隣接ノードは 5 つしかありませんでした。

これは、ネットワークが無向であるためだと思います。無向にする方法はありますか？

Answer 1

このigraphパッケージには、グラフを作成および操作するための多くの関数が含まれています。特に、このget.edgelist関数は必要な形式でエッジのリストを返します。

erdos.renyi.game確率を 1 に設定すると、この関数は完全なグラフを生成します。

library(igraph)
g1 <- erdos.renyi.game(5, 1)
plot(g1)
get.edgelist(g1)

このdegree.sequence.game関数は、所定の次数分布を持つランダム グラフを生成します。

g2 <- degree.sequence.game( c(3,3,3,2,1,1,1), method="vl" )
plot(g2)

このwatts.strogatz.game関数は、スモール ワールド ネットワークを生成します。

g <- watts.strogatz.game(1, 100, 5, 0.05)
plot(g)