if (FALSE) {
# download example data
path <- ebirdst_download("example_data")
# or get the path if you already have the data downloaded
path <- get_species_path("example_data")
# weekly relative abundance
abd_weekly <- load_raster(path, "abundance", resolution = "lr")
# dates corresponding to each week
parse_raster_dates(abd_weekly)
}
Run the code above in your browser using DataLab