# \donttest{
## Find all sites using a set of prior sites:
char_sites <- get_sites(taxa = "charcoal")
pollen_coloc <- get_sites(char_sites, datasettype = "pollen")
char_coloc <- char_sites %>% filter(siteid %in% getids(pollen_coloc)$siteid)
pol_char <- c(pollen_coloc, char_coloc)
# }
Run the code above in your browser using DataLab