# NOT RUN {
if(interactive()){
# load package data
awt <- raster::brick(system.file("extdata", "awt.grd", package = "blockCV"))
# import presence-absence species data
PA <- read.csv(system.file("extdata", "PA.csv", package = "blockCV"))
# make a sf object from data.frame
pa_data <- sf::st_as_sf(PA, coords = c("x", "y"), crs = raster::crs(awt))
rangeExplorer(rasterLayer = awt) # the only mandatory input
# add species data to add them on the map
rangeExplorer(rasterLayer = awt,
speciesData = pa_data,
species = "Species",
rangeTable = NULL,
minRange = 30000, # limit the search domain
maxRange = 100000)
}
# }
Run the code above in your browser using DataLab