Прогноз скользящей средней с R

Я новичок в R и хочу создать прогноз с использованием скользящего среднего, я использую библиотеку зоопарка для создания скользящего среднего из значений в моем списке, например:

test <- c(0,    0,  0,  0,  0,  0,  0,  0,  0,  831390, 843615, 903274, 778740, 777849, 807118, 781710, 732738, 768010, 701808, 690679, 617639, 640132, 605543, 648684, 612292, 668113, 651903, 659158, 742867, 771991, 759830, 727375, 714576, 794275)

testF <- tcast(test, deltat=1/12, start=c(2014,4))

testFc2<-rollapplyr(testF, 12, mean, partial=TRUE)

Это дает мне в результате:

         Jan      Feb      Mar      Apr      May      Jun      Jul      Aug      Sep      Oct      Nov      Dec
2014      0.0      0.0      0.0      0.0      0.0      0.0      0.0      0.0      0.0
2015  83139.0 152273.2 214856.6 279751.6 344572.3 411832.2 476974.7 538036.2 602037.0 660521.0 718077.6 769547.5
2016 753609.3 733770.0 712554.2 698683.5 689538.8 676604.2 666391.6 667235.7 667567.4 672402.6 675460.6 683538.7
2017 696383.9   

Значение, которое дает мне в январе 2017 года, — это значение, которое я хочу увидеть в феврале 2017 года, а в марте 2017 года я хочу увидеть результат суммы с марта 2016 года по февраль 2017 года, разделенный на 12 месяцев, и так до 2018 года.

Какие-либо предложения? Я спешу

Это ссылки, которые я уже видел:

• как использовать функцию прогноза для простого перемещения средняя модель в r?

  Скользящее среднее с изменением периода в R