Print an RtGam object
Usage
# S3 method for class 'RtGam'
print(x, ...)
Examples
withr::with_seed(12345, {
cases <- rpois(20, 10)
})
reference_date <- seq.Date(
from = as.Date("2023-01-01"),
length.out = 20,
by = "day"
)
fit <- RtGam::RtGam(cases, reference_date)
print(fit)
#> ===============================
#> Fitted RtGam model object (gam)
#> ===============================
#>
#> Model type: Non-adaptive (m = 1)
#> Specified maximum smoothing basis dimension: 15
#> Family: Negative Binomial(993826.867)
#> Link function: log
#> ===============================
#>
#> Observed data points: 20
#> Distinct reference dates: 20
#> Distinct groups: 1
#>