R中平均度节点为4的图

Question

如何创建平均节点度为4的随机图？

创建随机图后，如何找到图中有多少链接？

我找到了K-Nearest Neighbor Graph的函数，是否有平均节点度函数？

    library (igraph)
    g4 <- random.graph.game(100, p=5/100)
    graph.knn(g4)
    degree.distribution(g4)

Answer 1

不需要这个功能，R非常擅长计算平均值：

mean(degree(g4))
# [1] 4.58

ecount报告边数：

ecount(g4)
# [1] 229

要生成平均度为4的随机图，可以使用G（n，m）图。如果这些满足您的需求，您可以使用random.graph.game：

生成它们

g5 <- random.graph.game(10, 10 * 4 / 2, type="gnm")
mean(degree(g5))
# [1] 4