如何在R中生成一系列随机网络

Question

我是 R 初学者，所以请多多包涵。

我正在尝试创建一组大约 100 个随机网络，以与我的 60 个节点和 246 个加权链接的原始网络进行比较。

我希望每个网络的节点数量在 0-100 之间，每个节点具有随机密度（即任何一个节点将与另一个节点连接的随机概率），以及 1-5 之间的随机加权边。

我对 R 中的网络分析非常陌生，所以我不知道如何创建一个允许我输出 100 个的脚本（用循环猜测），也不知道如何指定随机边缘密度和权重。

任何建议都会很棒。

Answer 1

igraph 是一个好的开始：

library(igraph)
set.seed(1)
gs <- list()
for (x in seq_len(100L)) {
  gs[[x]] <- erdos.renyi.game(sample(1:100, 1), p.or.m = runif(1))
  E(gs[[x]])$weight <- sample(1:5, ecount(gs[[x]]), T)
}
plot(gs[[1]], edge.width = E(gs[[1]])$weight) # plot first graph

有关随机图生成的文档，请参阅?erdos.renyi.game。