如何在 ggplot2 中为单个几何/颜色组合创建图例条目？

【问题标题】：How do you create a legend entry for a single geom/color combination in ggplot2?如何在 ggplot2 中为单个几何/颜色组合创建图例条目？
【发布时间】：2020-05-26 11:12:11
【问题描述】：

我想在 ggplot2 中包含一个图例，用于只有一个值的几何/颜色组合。例如：

library(tidyverse)
lala <- tibble(
  haha = runif(100),
  baba = runif(100) - 2 , 
  equis = 1:100,
  cow = factor(round(runif(100)))
)
  runner <- tibble(ecks = rnorm(100) * 100, why = rnorm(100))

  ggplot(data = lala ) + 
geom_ribbon(mapping = aes(x = equis, ymax = haha, ymin = baba, fill = cow)) + 
geom_point(data = runner, aes( x = ecks, y = why))

丝带有图例，但我想要第二个图例，其中只有一个黑点条目。我知道这是一个愚蠢的例子，但我正在研究一个更严重的例子。有什么方法可以在没有标题或注释的情况下做到这一点？谢谢。

【问题讨论】：

标签： r ggplot2 legend legend-properties

【解决方案1】：

一种方法是在geom_point() 的美学中使用形状参数。然后，如果您需要重命名它，您可以使用labs() 函数。

ggplot(data = lala ) +
  geom_ribbon(mapping = aes(x = equis, ymax = haha,ymin = baba, fill = cow)) +
  geom_point(data = runner, aes(x = ecks, y = why, shape = "")) +
  labs(shape="name goes here")

【讨论】：

你也可以直接在aes（aes(shape = 'name goes here')）中命名aes标题，但我也认为使用labs更好。不过，我会给你的“常量”aes 一个不同的名称，而不仅仅是空的“”。