judylz的博客

原创 用stats::filter 计算滑动平均值lag0*

2.sides=1向前推，sides=2以lag0为中心（取），默认sides=2，例如stats::filter(x,rep(1,3),sides = 2)为加前一个后一个和当前数，当取值个数为偶数时，为当前数+前（取值个数/2-1）个数+后（取值个数/2）个数，1.系数c()，c()里变量数为取值个数，变量值为权重值，例如3个取同样权重rep(1,3)， 3个取不同权重c(0.5,1.0,1.5)；简化样式filter(目标对象x,系数c(),移动方式sides=)