R 如何在连续颜色图例中添加线条，而不是在绘图中添加线条？

有没有办法只在连续渐变图例中添加一条直线？我无法使用ggplot2找到任何此类示例

例如，如何仅在图例（例如1.7）中添加红色水平线

library(ggplot2)
x <- seq(1:1000)
y <-rnorm(1000,0,1)
df <- data.frame(x,y)
ggplot(df, aes(x, y, color = y)) + geom_point()

库（ggplot2）
x不知道如何在渐变图例上添加自定义线，但我知道如何添加自定义颜色的自定义记号标签：

library(ggplot2)
ggplot(df, aes(x, y, color = y)) + 
  geom_point() +
  scale_colour_gradient(breaks = c(-2, 0, 1.7, 2),
                        labels = c(-2, 0, "1.7 (important)", 2)) +
  guides(color = guide_colorbar(barheight = 10,
                                label.theme = element_text(colour = c("black", "black", 
                                                                      "red", "black"), 
                                                           angle = 0,
                                                           size = 12)))


请注意，“1.7”标签与“2”标签重叠。您可以执行以下操作之一：

ggplot(df, aes(x, y, color = y)) + 
  geom_point() +
  scale_colour_gradient(breaks = c(-2, 0, 1.7, 2),
                        labels = c(-2, 0, "<-- 1.7 (important)", 2)) +
  guides(color = guide_colorbar(barheight = 10,
                                label.theme = element_text(colour = c("black", "black", 
                                                                      "red", "black"), 
                                                           angle = 0,
                                                           size = 12)))

这可能与您的问题很接近，但不是确切的解决方案-如何添加线以绘制自身？这比只在图例中添加线条更有意义。@just好奇，我同意这在示例中效果很好，但对于我真正需要它的下刻面图来说，它不适用于我，因为它对于我的需要来说太忙了，每个刻面上都有82年的时间x13场景=在一个已经很忙的页面上有1066条红线。在图例上画红线可以很快找到流入量和储存量的对比点。
ggplot(df, aes(x, y, color = y)) + 
  geom_point() +
  scale_colour_gradient(breaks = c(-2, 0, 1.7, 2),
                        labels = c(-2, 0, "1.7 (important)", 2)) +
  guides(color = guide_colorbar(barheight = 10,
                                label.hjust = c(0, 0, 0.1, 0),
                                label.theme = element_text(colour = c("black", "black", 
                                                                      "red", "black"), 
                                                           angle = 0,
                                                           size = 12)))