TEAM_IDS <- teams.team_index(include_total_history = TRUE) %>%
select(Franchise, TeamId)
usethis::use_data(TEAM_IDS, overwrite = TRUE)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.