library(readr)
library(dplyr)
unmatched_poop_link = read_csv("https://raw.githubusercontent.com/KluaneRedSquirrelProject/poop/master/output/poop_no-matches.csv") %>%
mutate(squirrel_id = NA) %>%
rename(trapping_id = id)
usethis::use_data(unmatched_poop_link, overwrite = TRUE)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.