r - 如何在绘图中添加图例

Question

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

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)

标签： rplotlegend

Answer 1

您为图例指定的坐标 ( 46, 15) 在绘图区域“外部”

要么将这些数字更改为该区域内的某个值，要么使用一个常量，例如"topleft"