R 如何在ggplot2图形中有两个源标题？

我正在尝试在ggplot2图形中添加第二个标题。 类似于这位经济学家绘制的这张图

这是我制作的一个基本情节，我知道如何在右下角添加一个标题，但如何在左下角添加另一个标题

ggplot(mtcars, aes( mpg, hp)) +
  geom_point() +
  labs(title = "MTCARS MPG ~ HP",
       caption = "Source: mtcars dataset") 

---

通常，您有两个选项—要么在绘图外添加注释，要么创建两个（或三个！）绘图并将其组合

这两种选择都需要一些尝试和错误。希望您不会经常需要它，也不需要根据不同的规模等完全自动化它

库（ggplot2）
图书馆（拼凑）
textframe如果x轴是日期，如何制作“textframe”？因为-Inf不能与dates@arv-也许值得再问一个问题。如果你决定发帖，请不要忘记链接到这个问题。