带有参考年的两年移动平均线

Question

这是我的数据集

  Year   Pct
  2011   -97%
  2010   -95%
  2009   -90%
  2008   -72%
  2007   -40%
  2006    0
  2005    47%
  2004    71%
  2003    -25%
  2002    116%
  2001    -5%

我正在尝试估计 2001-2006 年的两年移动平均线和 2006-2011 年的第二次移动平均线

  Year    Pct   MovAvg
  2011   -97%   (-97  +  -95)/2
  2010   -95%   (-95  +  -90)/2
  2009   -90%   (-90  +  -72)/2
  2008   -72%   (-72  +  -40)/2
  2007   -40%   NA 
  2006    0     NA
  2005    47%   (47  +  71)/2
  2004    71%   (71  + -25)/2
  2003    -25%  (-25 + 116 )/2
  2002    116%  (116 - 5)/2
  2001    -5%

我知道

apply(embed(x, k), 1, mean)

提供了两年的滚动平均值，但我不确定如何在两个单独的时间窗口中实现此逻辑，第一个在

(2001 - 2006)

之间，第二个在

(2006-2011)

之间

非常感谢任何建议。谢谢。

Answer 1

将 2006 年的

Pct

值替换为

NA

。