# Simulierte Zeitreihen-Zaehldaten
set.seed(123)
df <- data.frame(
datum = seq.Date(from = as.Date("2023-01-01"), by = "day", length.out = 100),
value = rpois(100, lambda = 5)
)
# Automatische Familienauswahl basierend auf Overdispersion
explore_poisson_trend(df, datum_col = "datum", value_col = "value", family = "auto")
# Negative Binomial-GAM erzwingen
explore_poisson_trend(df, datum_col = "datum", value_col = "value", family = "negbin")
Run the code above in your browser using DataLab