颜色由社区属性(而不是顶点属性)定义。我两者都需要:根据一些顶点特征来更改顶点的颜色,并为社区周围的多边形着色。
g <- sample_gnm(15, 45) %>%
set_vertex_attr("att", value = rep(1:3,c(6,4,5)))
wc <- walktrap.community(g)
layout <-layout.fruchterman.reingold(g)
plot(wc, g, layout=layout, vertex.label=NA, vertex.size=10, vertex.color=V(g)$att, edge.arrow.size=.2)