r - geom_smooth 中的 color ="black"使用 R gglplot2 更改 lm 线。为什么？

Question

我的例子是用简单的可用数据制作的:

data(Salaries, package="car")
library(tidyverse)

运行时:

ggplot(Salaries, aes(x=yrs.since.phd, y=salary, color=rank))+
geom_point() +
geom_smooth(method="lm", size=0.5)+
facet_grid(~sex)

我得到了这张图，它为每个等级创建了一条 lm 线:



但是当我使用

ggplot(Salaries, aes(x=yrs.since.phd, y=salary, color=rank))+
geom_point() +
geom_smooth(method="lm", colour="black", size=0.5)+
facet_grid(~sex)

该图现在显示所有数据的唯一 lm 线:



知道发生了什么吗？为什么设置 colour="black"会改变图形中 lm 线的整体外观？

Answer 1

美学在每一层中重新使用:来自help(aes)
提供给 ggplot() 的美学被用作每一层的默认值。
您可以覆盖它们，或为每一层提供不同的美感

当您将颜色定义为等级级别时，ggplot 就是这样做的。此刻您覆盖颜色设置 (等级级别)在对 geom_smooth 的调用中, ggplot 降低绘制线条的级别。

您可以使用 fill 解决此问题和 shape=21并使用 color对于这样的行:

ggplot(Salaries, aes(x=yrs.since.phd, y=salary, fill=rank))+
  geom_point(shape=21) +
  geom_smooth(method="lm", 
              color="black",
              size=0.5)+
  facet_grid(~sex)

添加 se=FALSE调用 geom_smooth将删除彩色标准误差区间。

产生这个情节: