Jak nanieść adnotację na qplot ggplot2 poza legendą i plotą? (podobne do mtext())

Question

Chciałbym dodać adnotacje do moich działek z nazwą pliku. Z plot() użyłem mtext:

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

Jak mogę zrobić z ggplot2 i qplot lub ggplot? To nie powinno kolidować z legendą. Znalazłem polecenia annotate i grid, ale nie mogłem uzyskać adnotacji podobnej do tej z mtext.

Jako obejście problemu mogę wypróbować watermarks, ale być może masz dla mnie dobrą wskazówkę. poważaniem Jonas

Answer 1

Aktualizuj

wygląda na osiągnięcie skutku, teraz powinniśmy używać następujących:

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 odpowiedź

Spróbuj:

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