Example:
fish_2018 <- fish_anem_dive() %>%
filter(grepl("2018", date)) %>%
select(fish_table_id, sample_id, gen_id, recap, tag_id, anem_obs)
Example:
fish_2018 <- filter(fish_2018, !is.na(sample_id))
coords <- sample_latlon(fish2018$sample_id)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.