# BSD_2_clause
library(ecosscraper)
data(TECP)
all_links <- lapply(unique(TECP$Scientific_Name),
FUN = get_species_links,
df = TECP)
all_links <- dplyr::rbind_all(all_links)
all_links <- remove_silly_links(all_links)
devtools::use_data(all_links)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.