文本重叠几个方面

Question

我有一个使用（水平）方面构建的图表：

mtcars$cyl2 <- factor(mtcars$cyl, labels = c("alpha", "beta", "sqrt(x, y)"))
k <- ggplot(mtcars, aes(wt, mpg)) +
    geom_point()
k + facet_grid(. ~ cyl2)

我想在这个情节中添加文字。我了解如何使用geom_text将文字添加到单个方面，但我希望我的文字涵盖多个方面。像这样（在Paint中完成）：

内部 - ggplot版本更可取，但即使是在导出后注释图像的选项也可以。 （最终图片将通过knitr填写pdf。）

Answer 1

例如，您可以使用

library(grid)
grid.text("This is not alpha", x = 0.7, y = 0.8)