# NOT RUN {
# }
# NOT RUN {
if (requireNamespace("tsibbledata")) {
library(tsibble)
library(dplyr)
fit <- tsibbledata::aus_production %>%
model(
prophet = prophet(Beer ~ season("year", 4, type = "multiplicative"))
)
glance(fit)
}
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab