如何在ggplot2图中的自由位置放置文本

Question

如果我使用以下代码

library(ggplot2)
p <- ggplot(mtcars, aes(mpg, wt)) + geom_point() + facet_wrap(~cyl, ncol = 2)
p

我显然在SE角落（resulting chart）得到一张带有一个空白面的图表。我想在这个空白面上放置一些文字，例如与图表相关的解释或任何其他信息。我还没有找到解决方案，所有解决方案都将文本放在完整的方面。

感谢您的帮助！

乌尔里希

Answer 1

library(ggplot2)
p <- ggplot(mtcars, aes(mpg, wt)) + geom_point() + facet_wrap(~cyl, ncol = 2)
p
library(grid)
grid.text("your text", x = 0.75, y = 0.25)

see the answer that i got here