如何在ggplot中调整趋势线颜色，使mean线为蓝色、odd线为红色？

你的问题核心是颜色比例尺重复覆盖+未按类别绑定颜色，导致配色不符合预期，以下是具体修复方案：

问题拆解 #

1. 重复调用scale_color_manual：你连续加了两次颜色比例尺设置，后面的会直接覆盖前面的，等于第一次的颜色配置完全无效。
2. 无绑定的颜色赋值：直接用c("blue","deepskyblue","red","pink")这种无命名向量，颜色是按combined类别的默认排序分配的，一旦类别顺序和你预期的不一致，配色就会混乱。

修复步骤 #

1. 先确认combined的具体类别 #

运行这条命令查看你的combined列包含哪些类别：

unique(asd_pref_plot_groups$combined)

假设输出是类似c("mean_pref1", "mean_pref2", "odd_pref1", "odd_pref2")，接下来就可以针对每个类别精准绑定颜色。

2. 用命名向量指定配色逻辑 #

创建命名向量，把含"mean"的类别绑定蓝色系，含"odd"的绑定红色系，这样不管类别顺序怎么变，配色逻辑都不会出错：

# 按需求定义颜色：mean用蓝色系，odd用红色系，Pref1可深可浅
color_vec <- c(
  "mean_pref1" = "darkblue",   # mean组Pref1用深色蓝
  "mean_pref2" = "deepskyblue",# mean组另一类别用浅蓝
  "odd_pref1" = "darkred",     # odd组Pref1用深色红
  "odd_pref2" = "pink"         # odd组另一类别用浅红
)

fill_vec <- color_vec  # 填充色和线条色保持一致，也可单独调整

如果你的combined类别名称不同，只需要修改向量里的键名（比如把"mean_pref1"改成你实际的类别名）即可。

3. 修正后的完整代码 #

p2 <- ggplot(asd_pref_plot_groups, aes(x = x, y = predicted, col = combined)) +
  geom_line(size=1.5) +
  geom_ribbon(aes(ymin=conf.low, ymax=conf.high, fill=combined), alpha=.2, colour=NA) +
  geom_point(data=summStats, aes(x = trial, y = mean, col = combined), size=2) +
  # 只保留一次颜色和填充比例尺，用命名向量赋值
  scale_color_manual(values = color_vec) +
  scale_fill_manual(values = fill_vec) +
  theme_bw() +
  xlab('Trial') +
  ylab('Prediction Error') +
  ggtitle('ASD learning about TD vs. ASD \n learning about ASD') +
  theme(
    text=element_text(size=20),
    plot.title = element_text(hjust = 0.5),
    panel.border = element_blank()
  )

额外注意：主ggplot的aes里不要用pref_plot_groups$predicted这种写法，直接用列名predicted即可，因为已经指定了data = asd_pref_plot_groups，这样代码更规范也能避免潜在问题。

额外说明 #

不需要调整数据框结构，只要用命名向量把颜色和combined的具体类别绑定，就能精准控制配色。如果后续combined的类别有新增，只需要在color_vec和fill_vec里新增对应的键值对就行。

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