如何着色成組節點在圖表

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)