# Basic Gaussian GLM on continuous data
df <- data.frame(
datum = seq.Date(from = as.Date("2023-01-01"), by = "day", length.out = 100),
value = 5 + sin(1:100 / 10) + rnorm(100)
)
explore_continuous_trend(df, datum_col = "datum", value_col = "value", df_spline = 1)
# Automatische Auswahl zwischen Gaussian und Gamma
df2 <- data.frame(
datum = seq.Date(from = as.Date("2023-01-01"), by = "day", length.out = 100),
value = exp(seq(-1, 1, length.out = 100)) + rnorm(100, sd = 0.2)
)
explore_continuous_trend(df2,
datum_col = "datum",
value_col = "value",
df_spline = 2, family = "auto")
Run the code above in your browser using DataLab