如何在 r 中使用简单移动平均模型的预测函数?

how to use forecast function for simple moving average model in r?

我想预测我的简单移动平均模型的未来值。我使用了以下程序:

x <- c(14,10,11,7,10,9,11,19,7,10,21,9,8,16,21,14,6,7)   
df <- data.frame(x)    
dftimeseries <- ts(df)  
library(TTR)      
smadf <- SMA(dftimeseries, 4) # lag is 4    
library(forecast)    
forecasteddf <- forecast(smadf, 4) # future 4 values     

当 运行 上述代码时,我的预测值在接下来的 4 天内都是相同的。我编码正确吗?或者,我在概念上错了吗?

指数移动平均、加权移动平均、ARIMA也是如此。

对于移动平均模型,您可以阅读 here

"Since the model assumes a constant underlying mean, the forecast for any number of periods in the future is the same...".

所以,考虑到移动平均模式的特点,你的结果是可以预料的。

预测来自fpp2包,移动平均函数来自smooth包。

这是一个例子:

图书馆(流畅) 库(fpp2) 图书馆(readxl) setwd("C:\Users\lferreira\Desktop\FORECASTING")

数据<- read_xlsx("BASE_TESTE.xlsx") ts <- ts(数据$1740,start=c(2014,1),frequency=4)

fc <- forecast(sma(ts),h=3) Error: The provided model is not Simple Moving Average!