如何着色成组节点在图表

Question

V（S1）[ “158”] $颜色< - “黄金”

上面的代码改变仅一个节点的颜色。我想补充我的选择的多个节点说158,43，87和应用相同的颜色..

如何添加节点

Answer 1

这应该工作，假设158,43,87是也对应的指数

V(s1)$color[c(43,87,158)] <- "gold" 

但是，如果“158”，“43”，“87”是顶点标签和不对应的指数，那么你可以做到这一点，而不是

V(s1)$color[V(s1)$label %in% c("43", "87", "158")] <- "gold" 

一般来说，你可以通过以下方式更改节点颜色：

library(igraph) 
n <-sample(5:10,1) 
g <- graph.ring(n) 
plot(g, vertex.label=V(g)$number) 

# change all node colors 
V(g)$color <- "red" 

# change select node colors by indices 
V(g)$color[c(1,3,5)] <- "green" 
plot(g, vertex.label=V(g)$number) 

# change select node colors by matching node labels 
V(g)$label <- paste0("v", 1:n) 
V(g)$color[V(g)$label %in% c("v1", "v5")] <- "blue" 
plot(g)