四半期ごとの予測rを年間の数値に変換する

Question

私はlibrary(forecast)を使用して四半期データに基づいて四半期予測を作成しています。私の予測はforecastオブジェクトに保存されています。私は、すべての四半期の平均を取って、対応する年次値にそれらを変換するエレガントで簡単な方法を見つけることを試みています。

forecastパッケージにはこれを行うオプションがありますか？あるいは、四半期の値を変換する方法があれば？

forecastオブジェクトをtimeseriesオブジェクトに変換しようとしましたが、予測の作成に使用した元の時系列とマージしましたが、動作しませんでした。それはまだあなたに興味があるが、ここでは先の少なくとも3年間を含めるために、12個のステップ（四半期）を含むソリューションであれば

library('quantmod') 
library('xts') 
library('forecast') 
library(zoo) 
library(tis) 
library(astsa) 
library(xts) 
GDP_SAAR<-getSymbols('A191RL1Q225SBEA',src='FRED', auto.assign=FALSE) 
GDP_SAAR <- ts(GDP_SAAR , start=c(1947, 2), end=c(2017, 3), frequency=4) 
fit <- auto.arima(GDP_SAAR) 
x<-forecast(fit,h=7) 

Answer 1

私にはわからない：以下

は一例です集約された予測：

GDP_SAAR<-getSymbols('A191RL1Q225SBEA',src='FRED', auto.assign=FALSE) 
fit <- auto.arima(GDP_SAAR) 
x<-forecast(fit,h=12) 
DateTime=as.Date(seq(from=tail(index(GDP_SAAR),1),by="quarter",length.out = length(x$mean)+1)) 
myresult=tibble(Forecasts=x$mean,DateTime=DateTime[-1])%>%mutate(DateTime=year(DateTime))%>% 
    group_by(DateTime)%>%summarize(Forecasts=sum(Forecasts,na.rm=T)) 
> myresult 
# A tibble: 3 x 2 
    DateTime Forecasts 
    <int>  <dbl> 
1  2018  10.5 
2  2019  10.6 
3  2020  10.6 

希望これは