#r #vector-auto-regression
#r #вектор-авторегрессия
Вопрос:
Пожалуйста, любезно помогите, любой совет считается спасибо!
Я пытаюсь вычислить MAE (среднюю абсолютную ошибку) для окна прокрутки VAR (1), но не могу устранить ошибку. Код:
RRECG <- data.frame(na.omit(cbind(R1,R2,E1,C1,G1)))
set.seed(123)
y<-Df$R1
S=171;h=113;
error1.h<-c()
for (i in S:(length(y)-h))
{
VARO.sub<- VAR(na.omit(RRECG[(1:i),],p=1,type="const"))
predict.h1<-predict(VARO.sub,n.ahead=h)
error1.h<-c(error1.h,y[i h]-predict.h1)
}
summary(abs(error1.h))
Сообщение об ошибке:
Ошибка в y[i h] — predict.h1 : нечисловой аргумент двоичного оператора
Пробовал:
Also tried:
``` predict.h1<-as.numeric(predict(VARO.sub,n.ahead=h))
But not even close to resolve the issue. Please kindly help, thank you!
Комментарии:
1. Также пробовал:
error1.h,y[i h]-predict.h1$fcst$R1[,1])
но безуспешно.2. новичок на этом форуме, если потребуется дополнительная информация, пожалуйста, дайте мне знать.
3. Цените любые комментарии, пожалуйста, помогите, спасибо!