R中在图中的上方加字母（a），怎么办呢

下面是我的代码

rt1<-read.table("F:/RLCUSUM/似然比期望1.txt", head=TRUE)
plot(g2~μ,data=rt1,type='l',ylab= "E(loglr)",lty=2)
lines(g1~μ,data=rt1,type='l',ylab= "E(loglr)")