urls <- all_weeks$link
filenames <- file.path("data-raw/html/sources", paste0(basename(all_weeks$link), ".html"))
urls <- urls[!file.exists(filenames)]
filenames <- filenames[!file.exists(filenames)]
purrr::map2(urls, filenames, curl::curl_fetch_disk)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.