I want to annotate some text on the last facet of the plot with the following code:
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)
But this code annotates the text on every facet. I would highly appreciate if you guide me on how to get the annotated text on only one facet. Thanks in advance.