geom_smooth线条与置信区间填充颜色不一致问题求助

我来帮你搞定这个颜色错位的问题！你遇到的情况是因为fill和color是ggplot里两个独立的美学映射——哪怕它们都绑定到current_status这个变量，默认情况下ggplot会分别给它们分配颜色，导致线条和置信区间的填充色对应错位。下面给你两种靠谱的解决方法：

方法1：手动指定颜色对应关系 #

直接定义每个状态的颜色，确保填充色和线条色完全匹配，从根源上避免错位：

# 先定义每个状态对应的颜色（替换成你想要的颜色值，比如十六进制色码或颜色名称）
status_color_mapping <- c(
  "Active" = "#F8766D",  # 保留你原来正常显示的Active颜色
  "Retired" = "blue",
  "Unsigned" = "green"
)

# 重构绘图代码
qb_height_rating_scat <- ggplot(qb_stats, aes(x = height_in_inches, y = passer_rating)) 
qb_height_rating_scat + 
  geom_point(aes(fill = current_status), shape=21, size=2.5) + 
  stat_smooth(
    method=loess, size=1.2, span=.6,
    aes(fill = current_status, color = current_status)  # 同时绑定fill和color到状态变量
  ) +
  scale_fill_manual(values = status_color_mapping) +  # 填充色用定义好的映射
  scale_color_manual(values = status_color_mapping)    # 线条色用完全相同的映射

方法2：让fill和color共享同一颜色尺度 #

如果你想用ggplot的默认配色，只需要让fill和color共享同一个颜色尺度即可，不用手动指定颜色：

qb_height_rating_scat <- ggplot(qb_stats, aes(
  x = height_in_inches, 
  y = passer_rating,
  fill = current_status,  # 全局绑定fill
  color = current_status  # 全局绑定color
)) 
qb_height_rating_scat + 
  geom_point(shape=21, size=2.5) + 
  stat_smooth(method=loess, size=1.2, span=.6) +  # 继承全局的fill和color映射
  scale_color_fill_discrete()  # 强制让color和fill使用完全相同的颜色尺度

小提示 #

记得检查你原来的stat_smooth代码里，aes(color = current...是不是没写完——一定要补全color = current_status，这样才能正确绑定到状态变量哦。

内容的提问来源于stack exchange，提问作者Tyson Van Patten