---
title: "Generalized Linear Model Theta Forecast for any model"
output: rmarkdown::html_vignette
vignette: >
  %\VignetteIndexEntry{Generalized Linear Model Theta Forecast for any model}
  %\VignetteEngine{knitr::rmarkdown}
  %\VignetteEncoding{UTF-8}
---



```{r fig.width=7.5}
library(ahead)

y <- USAccDeaths

(obj1 <- ahead::glmthetaf(y, h=15L, fit_func=gam::gam, attention=TRUE))

(obj6 <- ahead::glmthetaf(y, h=15L, fit_func=glm, attention=FALSE))



plot(obj1)
plot(obj6)
```