ahead::ctxthetaf nu mai are informații contextuale despre seria temporală (ahead::contextridge2f încă mai are), dar încă funcționează și poate fi folosit în special cu caretS3 (o caret derivat introdus în https://thierrymoudiki.github.io/blog/2026/10/25/r/caretS3-ahead) pentru a prognoza datele din seria temporală. Următorul cod demonstrează cum se utilizează caretS3 modele pentru prognoza serii temporale cu ahead::ctxthetaf.
list_models <- caret::modelLookup()(caret::modelLookup()(,"forReg")==TRUE, 1)
n_models <- length(list_models)
pb <- utils::txtProgressBar(min = 0, max = n_models, style = 3)
for (i in seq_len(n_models))
{
ts_model <- try(ahead::ctxthetaf(y=fdeaths,
theta = 1,
h=25L,
fit_func = function (x, y) caretS3::caretS3(x, y,
method=list_models(i))),
silent = TRUE)
if (class(ts_model) != "try-error")
{
plot(ts_model)
}
utils::setTxtProgressBar(pb, i)
}
close(pb)
