R语言plot绘图如何按数据框指定列为不同测量日期匹配正确颜色

• 最常见的原因是colour_Date列是因子类型：base R的plot函数接收因子类型的颜色参数时，会自动将因子转为整数索引调用默认调色板，不会直接使用因子水平存储的颜色字符值。
• 若你后续需要添加图例，没有显式绑定日期和对应颜色，也会出现图例与实际点颜色不匹配的问题。

1. 先将colour_Date列强制转为字符类型，确保颜色值能被直接识别：

# 转换颜色列为字符型
dat$colour_Date <- as.character(dat$colour_Date)
# 重新绘图，指定实心点样式让颜色显示更清晰
plot(x = dat$Temperature,
     y = dat$Values, 
     col = dat$colour_Date,
     pch = 16)

2. 如果需要添加匹配的图例，先提取唯一日期和对应颜色再调用legend即可：

# 提取唯一日期与对应颜色的映射关系，替换为你数据里存储日期的列名
color_mapping <- unique(dat[,c("Date","colour_Date")])
# 添加图例，位置可根据绘图区域实际情况调整
legend("topright",
       legend = color_mapping$Date,
       col = color_mapping$colour_Date,
       pch = 16,
       title = "测量日期")

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