在Excel工作表中存储一组网络的节点度

Question

我有一个代码，可以使用igraph包在R中创建多个随机图。

set.seed(1)
gs1 <- list()
for (x in seq_len(500L)) 
{
  gs1[[x]] <- sample_bipartite(62, 243, type = "gnm",m = 630, directed = TRUE)

}

我知道如何分别检索每个图的节点度。

degree(gs1[[1]], v = V(gs1[[1]]), mode = c("all", "out", "in", "total"),
+        loops = TRUE, normalized = FALSE)

如您所见，我已经用这些值创建了500个随机网络。我想将所有500个网络的节点度存储在excel工作表中（希望在一个工作表中包含500列）。我该怎么办？好心劝告。

Answer 1

简单

write.csv(sapply(gs1, degree), file = "degrees.csv")

将完成这项工作。这将是305x500的表格。

此外，由于您的参数值是默认值，因此无需编写loops等。另外，只考虑mode的一个/第一个值，因此也许您应该再看看?degree以确定您想要的学位程度。