R 如何将图例添加到绘图中

我试图在我的情节中添加图例，但它没有出现。。。 请帮帮我

x<-c(0,5,10,15,20)
y<-c(0,8,15,19,20)
a<-data.frame(cbind(x,y))

plot(y~x)
m2<-lm(y~x +I(x^2),data=(a))
m1<-lm(y~x,data=a)
m3<-lm(y~x +I(x^2)+I(x^3),data=(a))
lines(a$x,predict(m2),col="blue",lwd=3) #linear
lines(smooth.spline(x,predict(m1)),col="yellow",lwd=5) #"polyx^2"
lines(smooth.spline(x,predict(m3)),col="red",lwd=3) #"polyx^3

legend(46,15,legend=c("m1: linear", "m2:poly x^2", "m3: poly x^3"),col=c("yellow","blue","red"),lty =c(1,1,3),lwd=3,bty="n",cex = 0.9)

---

x为图例指定的坐标（
46,15
）位于绘图区域的“外部”

将这些数字更改为区域内的某个数字，或者使用一个常量，如
“topleft”
您试图将图例放置在
（46,15）
。该点根本不在绘图窗口中。也许可以尝试
图例（10,10，…）