Ich möchte eine Tabelle mit den Koordinaten der markierten Site in einem ggplot hinzufügen.

Verwenden eines vorherigenFrage als Beispieldaten:

set.seed(1)
mydata <- data.frame(a=1:50, b=rnorm(50))
ggplot(mydata,aes(x=a,y=b)) + 
    geom_point(colour="blue") + 
    geom_point(data=mydata[10:13, ], aes(x=a, y=b), colour="red", size=5)

Ich möchte die folgende Tabelle in die untere rechte Ecke des Diagramms innerhalb des Diagrammbereichs einfügen. Irgendein Rat?

table<-cbind(sites=c("site 1","site 2","site 3","site 4"),mydata[10:13,])
table

    sites  a          b
    site 1 10 -0.3053884
    site 2 11  1.5117812
    site 3 12  0.3898432
    site 4 13 -0.6212406