# NOT RUN {
# 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")
# abundance data
abd <- load_raster(path, "abundance")
# count data
cnt <- load_raster(path, "count")
# calculate bins for a single week for this example
bins <- calc_bins(abd, cnt)
# }
Run the code above in your browser using DataLab