颜色图节点不同

Question

我需要对节点进行不同的着色以在R中绘制图社区（节点集）。在这种情况下，我处理了17个社区（因此我需要17种不同的颜色）。 为节点着色我使用此命令。

 V(g5)$color<- ifelse(V(g5)$name %in% V(g3)$name,com$membership+1, "white")

com$membership    
1  2  3  4  5  6  7  8  9 10 11 12 13 14 15 16 17  1  1  1  1  1  1  1  1  1  1  1  1  2  2  2  2  2  2  2  2  2  2  2  2  3  3  3  3  3  3  3  3  3  4  4  4 4  4  4  4  4  4  5  5  6  6  6  6  6  6  6  6  7  7  8  8  8  8  9  9  9  9  9  9  9  9 10 10 10 10 10 10 10 11 11 11 11 11 11 12 12 13 13 13 13 14 14 14 14 15 15 15 15 16 17 17 9 14

并绘制：

 plot(g5, vertex.color=V(g5)$name)

我只得到6种颜色的问题，重复到其他社区。 我该如何正确地为这17个社区涂上不同的颜色？

Answer 1

如果仅使用数字索引指定颜色，则R将从当前的palette()提取颜色。 默认情况下，它包含8种不同的颜色。

palette()
# [1] "black"   "red"     "green3"  "blue"    "cyan"    "magenta" "yellow" 
# [8] "gray"

如果您指定的索引大于8，则R只会在索引周围循环，以使1==9 。

您可以更改调色板以包含更多颜色

palette(rainbow(17))

或者，您可以显式设置颜色，而不是指定颜色索引。

mycols <- rainbow(17)
V(g5)$color<- ifelse(V(g5)$name %in% V(g3)$name,mycols[com$membership], "white")

这可能比更改调色板更“安全”，因为这也会影响所有其他图。

g <- graph.ring(17)
V(g)$color <- rainbow(17)
plot(g)

注意：要找到可以用肉眼轻松区分的17种不同的颜色并非易事。