Ich möchte einen Text auf der letzten Seite des Plots mit folgendem Code kommentieren:

library(ggplot2)
p <- ggplot(mtcars, aes(mpg, wt)) + geom_point()
p <- p + facet_grid(. ~ cyl)
p <- p + annotate("text", label = "Test", size = 4, x = 15, y = 5)
print(p)

Mit diesem Code wird jedoch der Text in jeder Facette mit Anmerkungen versehen. Ich würde mich sehr freuen, wenn Sie mir eine Anleitung geben, wie ich den mit Anmerkungen versehenen Text auf nur einer Facette erhalten kann. Danke im Voraus.