我一直在研究R中的一些时间序列数据,由于连续点之间存在一些差异,因此我想通过计算移动平均值来平滑数据。
我很难找到一个内置函数来执行此操作,但是遇到了迪迪埃·鲁丁(Didier Ruedin)的博客文章 ,其中描述了执行该任务所需的以下函数:
mav <- function(x,n=5){filter(x,rep(1/n,n), sides=2)}
我尝试插入一些数字以了解其工作原理:
> mav(c(4,5,4,6), 3)
Time Series:
Start = 1
End = 4
Frequency = 1
[1] NA 4.333333 5.000000 NA
在这里,我试图进行滚动平均,并考虑到最后三个数字,因此我希望只返回两个数字– 4.333333和5 –如果要使用NA值,我认为它们应该是在开始时序列。
实际上,事实证明这是'sides'参数所控制的:
sides
for convolution filters only. If sides = 1 the filter coe