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

我想在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))

---

色带有图例，但我想要第二个图例，其中有一个黑色点条目。我知道这是一个愚蠢的例子，但我有一个更严肃的例子，我正在努力。有没有办法不用标题或注释就可以做到这一点？谢谢

一种方法是在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")

---

一种方法是在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 aesshape='name goes here'中直接命名aes标题，但我也认为使用实验室更好。我会给你的常数aes一个不同的名称，而不仅仅是空的。你也可以直接在aes aesshape='name goes here'中命名aes标题，但我也认为使用实验室更好。我会给你的常数aes一个不同的名字，而不仅仅是空的。