`%>%` <- magrittr::`%>%`
usethis::ui_info("updating data ....")
here::here("R", "update.R") %>%
source()
usethis::ui_done("rendering the storyboard .....")
here::here("Rmd", "storyboard.Rmd") %>%
rmarkdown::render(
output_format = "flexdashboard::flex_dashboard",
output_file = "index.html",
output_dir = here::here("docs"),
quiet = FALSE
)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.