r语言如何做滑动平均

在R语言中，进行滑动平均（Moving Average）的计算通常可以使用内置的`rollapply`函数或者自定义一个函数来实现。以下是一个使用`rollapply`函数计算滑动平均的例子：

```r

安装和加载所需的包

install.packages("zoo")

library(zoo)

创建一个向量作为示例数据

data

定义滑动窗口的大小

window_size <3

使用rollapply计算滑动平均

rolling_mean

打印结果

print(rolling_mean)

```

如果不想安装额外的包，也可以通过自定义函数来实现滑动平均的计算：

```r

自定义计算滑动平均的函数

rolling_mean_custom

初始化结果向量

result

遍历数据，计算每个窗口的平均值

for (i in 1:(length(data) window_size + 1)) {

result[i]