# NOT RUN {
# }
# NOT RUN {
data(land)
data(Malagasy_amphibian)
Results <- IUCN.eval(Malagasy_amphibian, DrawMap=FALSE, country_map=land, SubPop=FALSE)
### This should run for 3 to 6 minutes depending of the computer.
### Maps covering the whole dataset with a minimum of 5 records in each cell
map.res(Results=Results, Occurrences=Malagasy_amphibian, country_map=land,
export_map=FALSE, threshold=5)
## Maps focusing on Madagascar with a minimum of 5 records in each cell
map.res(Results=Results, Occurrences=Malagasy_amphibian, country_map=land, export_map=FALSE,
threshold=5, LatMin=-25,LatMax=-12,LongMin=42, LongMax=52)
## Maps focusing on Madagascar at half degree resolution with a minimum of 5 records in each cell
map.res(Results=Results, Occurrences=Malagasy_amphibian, country_map=land,
export_map=FALSE,Resol=0.5,
threshold=5, LatMin=-25,LatMax=-12,LongMin=42, LongMax=52)
## Maps have been exported in the directory IUCN__results_map
map.res(Results=Results, Occurrences=Malagasy_amphibian, country_map=land, export_map=TRUE,
threshold=5, LatMin=-25,LatMax=-12,LongMin=42, LongMax=52)
## Install speciesgeocodeR package for an example with their lemurs dataset
library(speciesgeocodeR)
data("lemurs_in")
Results <- IUCN.eval(lemurs_in, DrawMap=FALSE, country_map=land, SubPop=FALSE)
map.res(Results=Results, Occurrences=lemurs_in, country_map=land, export_map=FALSE, threshold=3,
LatMin=-25,LatMax=-12,LongMin=42, LongMax=52, Resol=1)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab