diff --git a/R/R/prophet.R b/R/R/prophet.R index 7e950f9..7f2ac91 100644 --- a/R/R/prophet.R +++ b/R/R/prophet.R @@ -1661,7 +1661,7 @@ plot_seasonality <- function(m, name, uncertainty = TRUE) { end <- start + period * 24 * 3600 plot.points <- 200 days <- seq(from=start, to=end, length.out=plot.points) - df.y <- seasonality_plot_df(days) + df.y <- seasonality_plot_df(m, days) seas <- predict_seasonal_components(m, df.y) seas$ds <- df.y$ds gg.s <- ggplot2::ggplot(