使用 ggplot 生成自定义图例

Question

我有一个用 R 中的 ggplot() 生成的图，我想生成一个图例来解释我覆盖在数据上的垂直虚线，而不是数据本身。是否可以单独创建一个带有 geom_vline 组件解释的自定义图例？

我的代码是这样的：

ggplot(weektotals, aes(x=week, y=total)) + geom_line(color="red") + geom_point() + geom_vline(xintercept=as.Date("27/03/20", format = "%d/%m/%y"), linetype="dotted", color="darkred", size=1)

提前致谢！

Answer 1

没有数据，问题就无法重现，但是使用经济学内置数据集，您可以调整此代码，它允许调整图例文本输入，以适应...

library(ggplot2)

ggplot(head(economics, 12))+
  geom_point(aes(date, pop))+
  geom_vline(aes(xintercept = as.Date("1967-11-01", format = "%Y-%m-%d"), colour = "colour"), linetype = "dotted", size = 2)+
  scale_colour_manual(breaks = "colour", values = "red", label = "vline label")+
  labs(colour = "legend title")

^{由 reprex package (v2.0.1)}

于 2021-12-03 创建

使用 ggplot 生成自定义图例

Generating a custom legend with ggplot

r

ggplot2

customization

legend