ggplot2图例显示字母‘a’且点形状不符的原因咨询

先帮你梳理下问题根源和解决办法：

问题1：图例出现字母“a”的原因 #

你代码里用了ecolor=as.factor(subject)这个映射，但**ecolor并不是ggplot2的标准美学属性**（正确的颜色映射参数是color）。ggplot2会把这种自定义的、未被任何图层识别的美学映射，默认生成一个图例，而这个图例显示的“a”，应该是你subject变量的第一个因子水平值。

另外你的代码还有个语法错误：ggplot(...) otlp + 这里的otlp明显是输入失误，正确的写法是用+连接后续图层。

问题2：图例不显示geom_point的shape=1样式 #

因为你把颜色映射写在了不存在的ecolor上，而geom_point并没有关联这个ecolor映射——它的颜色没有绑定到subject变量，所以图例自然不会使用你设置的shape=1。只有当图层使用了和全局映射一致的美学属性时，图例才会同步样式。

修正后的代码 #

把ecolor改成标准的color，同时修正语法错误，代码如下：

plot <- ggplot(data=data, mapping=aes(x=independent, y=dependent, color=as.factor(subject))) +
  stat_cor(method = "pearson", size = 6) +
  geom_smooth(method=lm, se=FALSE, fullrange=TRUE) +
  geom_point(shape=1) +
  labs(color="Subject")

额外说明 #

• 如果你的subject已经是因子类型，可以直接写color=subject，不用再套as.factor()。
• 如果你只是想让geom_point按subject分颜色，而其他图层（比如geom_smooth）不需要，可以把color映射移到geom_point内部，而不是全局映射：

plot <- ggplot(data=data, mapping=aes(x=independent, y=dependent)) +
  stat_cor(method = "pearson", size = 6) +
  geom_smooth(method=lm, se=FALSE, fullrange=TRUE) +
  geom_point(aes(color=as.factor(subject)), shape=1) +
  labs(color="Subject")

这样修改后，图例就会正确显示shape=1的空心点，也不会出现莫名的“a”字母啦。

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