如何在 R 中使用绘图函数用平滑曲线连接散点图上的点?
如果散点图的散点程度很高,用平滑的线条连接点非常困难,但我们可能会想要查看无法通过只看点就理解的平滑度。了解该模型是否为线性模型也很有帮助。我们可以使用 plot 函数通过 loess 绘制模型来实现此目的。
示例
考虑以下数据 -
> set.seed(3) > x<-sample(1:100,10,replace=TRUE) > y<-rpois(10,100)
使用 loess 创建平滑线条 -
> Model <- loess(y~x) > summary(Model) Call: loess(formula = y ~ x) Number of Observations: 10 Equivalent Number of Parameters: 4.77 Residual Standard Error: 8.608 Trace of smoother matrix: 5.27 (exact) Control settings: span : 0.75 degree : 2 family : gaussian surface : interpolate cell = 0.2 normalize : TRUE parametric : FALSE drop.square: FALSE > plot(x,y)
输出
> lines(Model, col='red', lwd=2)
输出
广告