## Loads Caught Fish data
caught_fish <-
readr::read_csv("data-raw/files/Caught Fish.csv") %>%
make_cols_snake_case() %>%
dplyr::mutate(locations = convert_to_na(x = locations, value = -1)) %>%
dplyr::select(-locations, -unused)
usethis::use_data(caught_fish, overwrite = TRUE)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.