Estou tentando criar um gráfico de linha para 2 ações AAPL e FB.Em vez de de adicionar umlegenda separada, Gostaria de imprimir os símbolos de ações juntocom as linhas. Como posso adicionar geom_text ao seguinte código?
Agradeço qualquer ajuda que você possa fornecer.

library (ggplot2)
library(quantmod)
getSymbols('AAPL')
getSymbols('FB')

AAPL = data.frame(AAPL)
FB = data.frame(FB)
p1 = ggplot(AAPL)+geom_line(data=AAPL,aes(as.Date(rownames(AAPL)),AAPL.Adjusted,color="AAPL"))
p2 = p1+geom_line(data=FB,aes(as.Date(rownames(FB)),FB.Adjusted,color="FB"))
p2 + xlab("Year")+ylab("Price")+theme_bw()+theme(legend.position="none")