How to annotate ggplot2 qplot outside of legend and plotarea? (similar to mtext())

Question

I would like to annotate my plots with a filename. With plot() I used mtext:

plot(1:10)
mtext(\"File xy-12-34-56.csv\", 4)
<         


        

Answer 1

Update

Looks like to achieve the result now we should use the following:

library(ggplot2)
library(grid)
library(gridExtra)
p <- qplot(data = mtcars, wt, mpg)
grid.arrange(p, right = textGrob("File xy-12-34-56.csv", rot = -90, vjust = 1))

Old answer

Try this:

library(gridExtra)
p <- qplot(data = mtcars, wt, mpg)
print(arrangeGrob(p, legend = textGrob("File xy-12-34-56.csv", rot = -90, vjust = 1)))