我正在尝试使用相同的代码重新绘制数据,第一次看起来很好,但现在这些线都奇怪地连接起来。这是代码:
lines(x, predict(gam.ns), col=1, lwd=2)
我错过了什么?谢谢!
lines()
按顺序连接点。您的数据集之前是按 x
的顺序排序的,此版本不是。您可以返回上游订购它们,或者:
ox <- order(x)
lines(x[ox], predict(gam.ns)[ox], col=1, lwd=2)
x[ox]
与 sort(x)
相同,但您需要 ox
,因为您想以相同的顺序排列预测值...