移动平均模型的概念

移动平均模型是具有q步外不相关性质的平稳列的模型;
对于高阶的AR模型,
有些可以用低阶的MA模型更好地描述。
一般的AR模型也可以用高阶MA模型近似。

理论上,AR模型也可以是无穷阶的:

Xt=ϕ0+j=1ϕjXtj+εt

其中{ϕj}应绝对可和。
一个特例为

Xt=ϕ0j=1(θ1)jXtj+εt

其中0<|θ|<1
将模型写成:

Xt+j=1(θ1)jXtj=ϕ0+εt(*)

t1代入,并乘以θ1,有

j=1(θ1)jXtj=ϕ0θ1θ1εt1

代入到(*)式中得

Xt=ϕ0(1+θ1)+εt+θ1εt1

这样的模型称为MA(1)模型。

一般地,若{εt}是零均值独立同分布白噪声,
方差为σ2|θ1|<1

Xt=θ0+εt+θ1εt1

易见{Xt}为线性时间序列形式的弱平稳列,
称为MA(1)序列。

类似地,MA(2)序列的模型为

Xt=θ0+εt+θ1εt1+θ2εt2

MA(q)序列的模型为

Xt=θ0+εt+θ1εt1++θqεtq

此模型也有特征多项式

1+θ1z++θqzq

特征方程的根称为特征根,
特征根都在单位圆外的条件称为MA模型的可逆条件。
平稳性并不需要特征根的条件。

上面从AR()导出MA(1)的过程,
实际用了滞后算子的一些运算法则:
P(z)=j=0ϕjzjQ(z)=j=0θjzj
j=0|ϕj|<,
j=0|θj|<,
P(z)Q(z)=R(z)=j=0rjzj
且对弱平稳列{ξt}P(B)Q(B)ξt=R(B)ξt

详见(何书元 2003)§2.1,以及李东风“应用时间序列分析课堂演示”。

移动平均模型的性质

以MA(1)和MA(2)为例讨论MA序列的性质,一般MA(q)序列类似讨论即可。

平稳性与自相关函数性质

以MA(1)为例。Xt=θ0+εt+θ1εt1
其中{εt}是零均值独立同分布白噪声,
θ0, θ1是任意实数,
平稳性不需要特征根的条件。

易见

EXt=θ0, t,Var(Xt)=σ2(1+θ21)

γ1=E[(Xtθ0)(Xt1θ0)]=E[(εt+θ1εt1)(εt1+θ1εt2)]=θ1Eε2t1=σ2θ1

k>1

γk=E[(εt+θ1εt1)(εtk+θ1εtk1)]=0 (k>1)

因为k>1,所以tk1<tk<t1<t
求协方差时均不相关。

所以,对于MA(1)序列,有

γk=⎧⎩⎨⎪⎪σ2(1+θ21),σ2θ1,0,k=0k=1,k>1

相应地,MA(1)的自相关函数为

ρk=⎧⎩⎨⎪⎪1,θ11+θ21,0,k=0k=1,k>1

这就验证了MA(1)序列是弱平稳列。
MA(1)的自相关函数在k>1后为零的性质叫做MA序列的自相关函数截尾性。

对于MA(q)序列

Xt=θ0+εt+θ1εt1++θqεtq

易见

EXt=θ0,Var(Xt)=σ2(1+θ21++θ2q)

其自相关函数ρk也满足q后截尾性,
ρk=0, k>q
如果θq0
ρq0
这样,
MA(q)序列的两个时间点的观测XsXt|st|>q时不相关,
代表了一种特殊的“有限记忆”的模型。
MA序列的自相关函数截尾性也是在模型识别和定阶时的重要依据。

可逆性

对MA(1)模型,
|θ1|<1时,
根据本章开始的推导可得

εt=ϕ0+Xt+j=1(θ1)jXtj

其中的级数是可以在a.s.意义和均方意义下收敛的。
这表明新息εt可以用当前的观测Xt以及历史观测Xtj,j=1,2,的线性组合表示,
而且历史观测Xtj所在时刻离t时刻越远,
其作用越小。
这种性质叫做模型的可逆性。
MA模型的平稳性不需要可逆性条件,
但是从理论讨论的角度,
可逆的线性时间序列更合理:
{Xt,Xt1,}{εt,εt1,}可以互相线性表示,
对任意t成立。

移动平均模型定阶

MA(q)序列的理论自相关函数ρkq后截尾,
ρq0, ρk=0, k>q

{Xt}为独立同分布白噪声列的条件下,
k>0ρ̂ k渐近N(0,1T)分布,
所以查看ACF图,
最后一个显著不等于零的ρ̂ k的位置可以暂定为MA模型的阶。

实际上,如{Xt}是MA(q)序列,
则对k>qT‾‾√ρ̂ k渐近服从正态分布,
渐近均值为零,渐近方差为

1+2ρ21++2ρ2q

也可以用AIC定阶:

AIC(k)=lnσ̂ 2k+2kT

其中σ̂ 2k是用MA(k)建模时新息方差的最大似然估计。

例5.1 考虑CRSP等权指数月度收益率,时间从1926-1到2008-12。

d <- read_table2(
  "m-ibm3dx2608.txt",
  col_types=cols(.default=col_double(),
                 date=col_date(format="%Y%m%d")))
## Warning: `read_table2()` was deprecated in readr 2.0.0.
## ℹ Please use `read_table()` instead.
ibmind <- xts(as.matrix(d[,-1]), d$date)
rm(d)
tclass(ibmind) <- "yearmon"
ew <- ts(coredata(ibmind)[,"ewrtn"], start=c(1926,1), frequency=12)
head(ibmind)
##             ibmrtn     vwrtn     ewrtn     sprtn
## 1月 1926 -0.010381  0.000724  0.023174  0.022472
## 2月 1926 -0.024476 -0.033374 -0.053510 -0.043956
## 3月 1926 -0.115591 -0.064341 -0.096824 -0.059113
## 4月 1926  0.089783  0.038358  0.032946  0.022688
## 5月 1926  0.036932  0.012172  0.001035  0.007679
## 6月 1926  0.068493  0.056888  0.050487  0.043184
plot(ew, main="CRSP Equal Weighted Index Monthly Return")
abline(h=0, col="gray")


CRSP等权指数月度收益率

图5.1: CRSP等权指数月度收益率

forecast::Acf(ew, main="")


CRSP等权指数月收益率的ACF

图5.2: CRSP等权指数月收益率的ACF

ACF在k=1很大,在k=3k=9也比较明显。
可以考虑拟合MA(3)或MA(9)。

○○○○○

移动平均模型的估计

MA模型参数的估计方法有:

  • 矩估计法,利用{γk}{θk}σ2的关系求非线性方程组解;
  • 逆相关函数法,将MA模型转换为长阶自回归模型,用估计自回归模型的方法估计,能保证可逆性;
  • 新息估计法;
  • 条件最大似然估计法;
  • 精确最大似然估计法。

前面三种方法见(何书元 2003)§6.2。

条件最大似然估计法和完全最大似然估计法都假定{εt}为高斯白噪声,
计算似然函数。
在条件最大似然估计法中,
近似假定εt=0,t0
这样就可以得到ε1=x1θ0,
ε2=x2θ0θ1ε1等递推表示,
将其代入εt,t=1,2,,T的独立联合正态分布密度中就得到了条件似然函数,
求其关于σ2θ0,θ1,,θq的最大值点。

在精确最大似然估计中,将εt,t=1q,2q,,1,0也作为未知参数,
与其它模型参数一起估计。

条件最大似然估计更容易计算,在T充分大时两者的结果趋于相同。
在样本量较小时精确最大似然估计结果更为精确。
见(Tsay 2010)第8章。

例5.2 考虑例5.1中的CRSP等权指数月度收益率用MA建模,
时间从1926-1到2008-12。

例5.1提示建立MA(9)。
在R中用arima()函数可以建立AR模型和MA模型。

resm1 <- arima(ew, order=c(0,0,9)); resm1
## 
## Call:
## arima(x = ew, order = c(0, 0, 9))
## 
## Coefficients:
##          ma1     ma2      ma3      ma4     ma5      ma6     ma7      ma8
##       0.2144  0.0374  -0.1203  -0.0425  0.0232  -0.0302  0.0482  -0.0276
## s.e.  0.0316  0.0321   0.0328   0.0336  0.0319   0.0318  0.0364   0.0354
##          ma9  intercept
##       0.1350     0.0122
## s.e.  0.0323     0.0028
## 
## sigma^2 estimated as 0.005043:  log likelihood = 1220.86,  aic = -2419.72

对残差作Ljung-Box白噪声检验:

Box.test(resm1$residuals, type="Ljung", lag=12, fitdf=9)
## 
##  Box-Ljung test
## 
## data:  resm1$residuals
## X-squared = 6.0921, df = 3, p-value = 0.1072

结果不显著,检验结果支持所建立的模型。

从结果的标准误差构造近似95%置信区间,
可以看出θkk=2,4,5,6,7,8处不显著。
所以,可以用arima()函数的fixed=指定这些参数固定为0:

resm1b <- arima(ew, order=c(0,0,9), 
                fixed=c(NA,0,NA,0,0,0,0,0,NA,NA))
resm1b
## 
## Call:
## arima(x = ew, order = c(0, 0, 9), fixed = c(NA, 0, NA, 0, 0, 0, 0, 0, NA, NA))
## 
## Coefficients:
##          ma1  ma2      ma3  ma4  ma5  ma6  ma7  ma8     ma9  intercept
##       0.1909    0  -0.1199    0    0    0    0    0  0.1227     0.0122
## s.e.  0.0293    0   0.0338    0    0    0    0    0  0.0312     0.0027
## 
## sigma^2 estimated as 0.005097:  log likelihood = 1215.61,  aic = -2421.22

没有限定之前,AIC为2419.72
限定后,AIC为2421.22,限定后的AIC更优。

为了比较不同的模型,
可以逐个尝试不同的模型并比较AIC的值。

○○○○○

注意,R的stats::arima()函数的默认模型格式为

(1ϕ1BϕpBp)(Xtμ)=(1+θ1B++θqBq)εt

其中μ对应于输出中的截距项(intercept)。
系数会输出为ar1, ……, arp, ma1, ……, maq, intercept的次序,
ark对应ϕkmak对应θk
intercept对应μ

移动平均模型的预测

因为MA(q)序列在间隔超过q步以后就独立,
所以超前多步预测,
只能预测到q步,
q+1步开始就只能用均值μ预测了。

以MA(1)为例,

Xt=θ0+εt+θ1εt1

超前一步:

x̂ h(1)=E(Xh+1|x1,,xh)=θ0+θ1εh

这里利用了E(εh+1|x1,,xh)=0
εh是第h个新息,
可以作为模型的残差计算,
或者通过将MA模型表达为AR模型来计算。
较精确的做法是“递推预报”,
参见(何书元 2003)§5.3。

超前两步:

x̂ h(2)=E(θ0+εh+2+θ1εh+1|x1,,xh)=θ0

从两步开始的超前多步预报就变成EXt=θ0了。

类似地,对于MA(2)序列,

x̂ h(1)=θ0+θ1εh+θ2εh1, x̂ h(2)=θ0+θ2εh

k=3,4,则有x̂ h(k)=θ0=EXt

在R软件中,
stats::arima()函数建模后,
对建模结果用predict()函数计算预测值和对应的近似标准误差。

例5.3 考虑例5.2中的CRSP等权指数月度收益率用稀疏系数的MA(9)建模,
但保留最后10个月的数据作为验证。
原始数据中时间从1926-1到2008-12。

resm1c <- arima(ew[1:986], order=c(0,0,9), 
                fixed=c(NA,0,NA,0,0,0,0,0,NA,NA))
resm1c
## 
## Call:
## arima(x = ew[1:986], order = c(0, 0, 9), fixed = c(NA, 0, NA, 0, 0, 0, 0, 0, 
##     NA, NA))
## 
## Coefficients:
##          ma1  ma2      ma3  ma4  ma5  ma6  ma7  ma8     ma9  intercept
##       0.1844    0  -0.1206    0    0    0    0    0  0.1218     0.0128
## s.e.  0.0295    0   0.0338    0    0    0    0    0  0.0312     0.0027
## 
## sigma^2 estimated as 0.005066:  log likelihood = 1206.44,  aic = -2402.88
pred1c <- predict(resm1c, n.ahead=10, se.fit=TRUE)
tmp.tab <- cbind(Observed=round(c(ew[987:996]), 4), 
                 Predicted=round(c(pred1c$pred), 4), 
                 SE=round(c(pred1c$se), 4))
row.names(tmp.tab) <- sprintf("2008-%02d", 3:12)
tmp.tab
##         Observed Predicted     SE
## 2008-03  -0.0260    0.0043 0.0712
## 2008-04   0.0312    0.0136 0.0724
## 2008-05   0.0322    0.0150 0.0724
## 2008-06  -0.0871    0.0145 0.0729
## 2008-07  -0.0010    0.0120 0.0729
## 2008-08   0.0141    0.0018 0.0729
## 2008-09  -0.1209    0.0122 0.0729
## 2008-10  -0.2060    0.0055 0.0729
## 2008-11  -0.1366    0.0085 0.0729
## 2008-12   0.0431    0.0128 0.0734

因为次贷危机影响,实际收益率不如预测的那么好。
可以看出当k=10的时候(模型q=9)预测等于序列均值。
超前多步预测的标准误差逐渐增加到等于序列的样本标准差:

## [1] 0.07368157

○○○○○

AR和MA的小结

  • 对MA(q)模型,ACF对定阶有意义,因为其q后截尾;
  • 对AR(p)模型,PACF对定阶有意义,因为其p后截尾;
  • MA模型的序列不管系数如何总是平稳的,
    实际上还是因果线性时间序列,
    当特征根都在单位圆外时是可逆的;
  • AR模型只有当特征根都在单位圆外时才有ϵt
    Xt1,Xt2,独立的弱平稳解;
  • 对AR和MA序列,超前多步预测趋于序列的均值,
    预测均方误差趋于序列的方差。

参考文献

Tsay, Ruey S. 2010. Analysis of Financial Time Series. 3rd Ed. John Wiley & Sons, Inc.

何书元. 2003. 应用时间序列分析. 北京大学出版社.