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")))