r - geom_line() 和 geom_segment() 一起使用时看似不正确的引导颜色

Question

我正在使用 geom_line() 的绘图顶部绘制一些线段。令人惊讶的是，geom_line() 的引导（图例）颜色被绘制为我添加到绘图中的最后一个元素的颜色——即使它不是 geom_line()。这对我来说似乎是一个错误，但由于某种我不明白的原因，它可能是预期的行为。

#Set up the data
require(ggplot2)
x <- rep(1:10, 2)
y <- c(1:10, 1:10+5)
fac <- gl(2, 10)
df <- data.frame(x=x, y=y, fac=fac)

#Draw the plot with geom_segment second, and the guide is the color of the segment
ggplot(df, aes(x=x, y=y, linetype=fac)) +
  geom_line() +
  geom_segment(aes(x=2, y=7, xend=7, yend=7), colour="red")

而如果我先添加 geom_segment，指南上的颜色是黑色的，正如我所期望的：

ggplot(df, aes(x=x, y=y, linetype=fac)) +
  geom_segment(aes(x=2, y=7, xend=7, yend=7), colour="red") +
  geom_line()

功能还是错误？如果是第一个，有人可以解释发生了什么吗？

Answer 1

特征（ish）。绘制的指南是线型的指南。但是，它必须以某种颜色绘制才能看到。当美学映射未指定颜色时，ggplot2 以与绘图一致的颜色绘制它。我推测默认值是使用的最后一种颜色。这就是为什么当您以不同的顺序绘制它们时会看到差异。

但是，您可以控制图例的这些细节。

ggplot(df, aes(x=x, y=y, linetype=fac)) +
  geom_line() +
  geom_segment(aes(x=2, y=7, xend=7, yend=7), colour="red") +
  scale_linetype_discrete(guide=guide_legend(override.aes=aes(colour="blue")))