Dynami c линейная регрессия модели с использованием dlmModReg () и dlmForecast () в R

Question

Я выполняю динамический c линейный регрессионный анализ, но всегда сталкиваюсь с ошибкой, как показано в примере:

nAhead <- 12
mod <- dlmModSeas(4)+dlmModReg(cbind(rnorm(100+nAhead),rnorm(100+nAhead)))
fi <- dlmFilter(c(rnorm(100),rep(NA,nAhead)),mod)
f <- dlmForecast(fi,nAhead=12)

Ошибка в dlmForecast (fi, nAhead = 12): dlmForecast работает только с постоянными моделями

Как правильно использовать dlmForecast ()?