Just posting this here as an issue when I noticed that an issue in the testfiles was not yet resolved:
This is based on an issue reported via email by Steven S. on 27/01-2017. The initial problem was fixed, but the one below has also come up.
set.seed(123)
mxreg <- zooreg(matrix(rnorm(700),ncol=7),start = 2002 ,frequency = 12)
colnames(mxreg) <- c("c1","c2","c3","c4","c5","c6","c7")
y = zooreg(rnorm(88),start = 2002 ,frequency = 12)
isat_mod <- isat(y, mxreg = mxreg, mc = TRUE, ar = 4, sis = TRUE, t.pval = 0.01, vcov.type = "white", print.searchinfo = FALSE)
newmxreg <- tail(na.trim(mxreg),12)
new_index <- index(tail(na.trim(mxreg),12))
prediction_isat <- predict.isat(isat_mod, newmxreg = newmxreg, n.ahead = 12, newindex = new_index, return = TRUE)
Just posting this here as an issue when I noticed that an issue in the testfiles was not yet resolved:
This is based on an issue reported via email by Steven S. on 27/01-2017. The initial problem was fixed, but the one below has also come up.