在R中使用LOESS拟合直线
在R中使用LOESS拟合直线
提问于 2013-03-11 17:39:51
我有一个数据集，里面有一些点，我想要在上面拟合一条线。我用loess函数尝试了一下。不幸的是，我得到了非常奇怪的结果。请看下面的图。我希望有一条线能更多地穿过这些点，覆盖整个情节。我怎样才能做到这一点呢？
如何重现：
从https://www.dropbox.com/s/ud32tbptyvjsnp4/data.R?dl=1下载数据集(仅2kb)，并使用以下代码：
load(url('https://www.dropbox.com/s/ud32tbptyvjsnp4/data.R?dl=1'))
lw1 = loess(y ~ x,data=data)
plot(y ~ x, data=data,pch=19,cex=0.1)
lines(data$y,lw1$fitted,col="blue",lwd=3)任何帮助都是非常感谢的。谢谢!
页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接：
https://stackoverflow.com/questions/15337777
复制相关文章
相似问题