使用gsub查找R中不相等的所有值

Question

在绘制网络图之前,我试图使用gsub将Igraph顶点变量中的值更改为颜色.
问题是我的图表有3个我关心的值,还有许多其他的我只想分组为"其他"并分配1种颜色.

例如,如果我有这样的数据:

Name........Value  
A............1  
B............2  
C............3  
D............4  
E............5  

我有这样的代码:

V(g)$color=V(g)$value #assign the "Value" attribute as the vertex color  
V(g)$color=gsub("1","red",V(g)$color) #1 will be red  
V(g)$color=gsub("2","blue",V(g)$color) #2 will be blue  
V(g)$color=gsub("3", "yellow", V(DMedge)$color) #3 is yellow  

我可以添加什么代码来使4和5成为其他颜色(例如绿色)？非常感谢您的帮助!

Answer 1

我会避免sub(这不是关于匹配模式)并做:

my.colors <- c("red", "blue", "yellow", "green")
V(g)$color <- my.colors[match(V(g)$value, c(1, 2, 3), nomatch = 4)]