在R中为histogram增加拟合曲线

有一个前题,那就是,这里我们并不需要真实的数据分布曲线,只是希望得到一条曲线,可以拟合柱状图的高度就可以了。如果知道分布公式了,可以直接使用分布公式计算出拟合曲线。

我们使用的办法是使用loess回归后计算出一条拟合曲线。

> h<-hist(mtcars$mpg, breaks=12)
> lo <- loess(h$counts~h$mids)
> x<- seq(min(h$breaks), max(h$breaks), (max(h$breaks)-min(h$breaks))/1000)
> lines(x, predict(lo, x), col="red")

发表评论

电子邮件地址不会被公开。 必填项已用*标注