# NOT RUN {
# Data for examples
data("mx", package = "biosurvey")
data("species_data", package = "biosurvey")
# Saving species data in a temporal directory
tdir <- file.path(tempdir(), "testbio")
dir.create(tdir)
namessp <- paste0("species_", 1:length(species_data))
for (i in 1:length(species_data)) {
rgdal::writeOGR(species_data[i, ], dsn = tdir, layer = namessp[i],
driver = "ESRI Shapefile")
}
# Preparing grid for analysis
grid_reg <- grid_from_region(region = mx, cell_size = 100)
# Running analysis with data from directory
sp_data <- files_2data(path = tdir, format = "shp", spdf_grid = grid_reg)
# }
Run the code above in your browser using DataLab