[英]How to extract edge list of communities in igraph?
我正在使用igraph进行社区检测,当然它会在图中绘制社区。 我想做的是将每个组件作为边列表写入文本文件。 不幸的是,我在igraph中找不到执行此操作的任何功能。 有人可以帮我吗?
karate <- make_graph("Zachary")
wc <- cluster_walktrap(karate)
您可以获取诱导子图,将其转换为边列表并将其写出。 我假设您希望保留顶点的原始编号,因此我添加了一行。
## Your setup
library(igraph)
karate <- make_graph("Zachary")
wc <- cluster_walktrap(karate)
########### Answer #########
for(i in seq_along(wc)) {
Community = induced_subgraph(karate, wc[[i]])
V(Community)$name <- wc[[i]] ## To preserve original node numbers
EL = as_edgelist(Community)
FileName = paste0("Community", i, ".dat")
write.table(EL, FileName, row.names=FALSE, col.names=FALSE, sep=",")
}
声明:本站的技术帖子网页,遵循CC BY-SA 4.0协议,如果您需要转载,请注明本站网址或者原文地址。任何问题请咨询:yoyou2525@163.com.