# NOT RUN {
# Data
data("species_data", package = "biosurvey")
data("mx", package = "biosurvey")
# GRID
grid_reg <- grid_from_region(region = mx, cell_size = 100)
# Species data from polygons
sp_data <- spdf_2data(spdf_object = species_data, spdf_grid = grid_reg)
summary(sp_data)
# }
Run the code above in your browser using DataLab