在R语言中如何实现颜色与对应数值的关联？

方法1：直接下标索引 #

你的numEra取值刚好是cols向量的下标（1对应第一个元素"red"，2对应第二个元素"gray60"），直接通过索引就能完成关联：

cols <- c("red", "gray60")
numEra <- c(1, 1, 1, 2, 2, 2)
# 生成对应颜色向量
color_mapping <- cols[numEra]
# 输出结果：[1] "red"    "red"    "red"    "gray60" "gray60" "gray60"

方法2：命名向量映射（通用场景） #

如果后续numEra的取值不是连续下标（比如是5、10这类非1/2的值），可以用命名向量来建立映射关系，更灵活：

cols <- c("red", "gray60")
numEra <- c(1, 1, 1, 2, 2, 2)
# 创建命名向量，名字对应numEra的取值，值对应颜色
named_cols <- setNames(cols, c(1, 2))
# 通过名字匹配获取颜色
color_mapping <- named_cols[as.character(numEra)]

方法3：因子转换（适配绘图场景） #

如果是为绘图准备颜色映射，将numEra转为因子后再关联颜色，能更好适配ggplot等绘图包的需求：

cols <- c("red", "gray60")
numEra <- c(1, 1, 1, 2, 2, 2)
# 将数值转为因子，指定水平顺序
era_factor <- factor(numEra, levels = c(1, 2))
# 关联颜色
color_mapping <- cols[era_factor]
# 后续绘图时可直接用：scale_color_manual(values = cols)

内容的提问来源于stack exchange，提问作者user20115379