Nothing
## ---- echo = FALSE, message = FALSE-------------------------------------------
knitr::opts_chunk$set(collapse = T, comment = "#>")
options(tibble.print_min = 4L, tibble.print_max = 4L)
library(prophet)
library(dplyr)
## ---- results= "hide"---------------------------------------------------------
library(readr)
df <- read_csv('../tests/testthat/data.csv')
## -----------------------------------------------------------------------------
m <- prophet(df)
## -----------------------------------------------------------------------------
future <- make_future_dataframe(m, periods = 365)
head(future)
## -----------------------------------------------------------------------------
forecast <- predict(m, future)
head(forecast)
## -----------------------------------------------------------------------------
plot(m, forecast)
## -----------------------------------------------------------------------------
prophet_plot_components(m, forecast)
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.