Adicionando tabela dentro da região de plotagem de um ggplot em r
Eu gostaria de adicionar uma tabela das coordenadas do site destacado em um ggplot.
Usando um anteriorquestão como dados de exemplo:
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)
Eu gostaria de adicionar a seguinte tabela ao canto inferior direito da plot dentro da região de plotagem. Algum conselho?
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