我可以使用下面的代码生成和绘制社区:
wc <- walktrap.community(subgraph)
modularity(wc)
membership(wc)
layout <-layout.fruchterman.reingold(subgraph)
plot(wc, subgraph, layout=layout, vertex.label=NA, vertex.size=5, edge.arrow.size=.2)
Run Code Online (Sandbox Code Playgroud)
但是,社区的颜色是自动的,我有两个问题: