## Not run:
# data(lemurs)
# data(mdg_poly)
#
# SpeciesGeoCoder(lemurs, mdg_poly)
# conv <- Spgc2Biogeobears(outp)
# ## End(Not run)
data(lemurs)
data(mdg_poly)
inp <- ReadPoints(lemurs, mdg_poly)
outp <- SpGeoCodH(inp)
e <- c(42, 52, -27, -10)
ivesia_abu <- RichnessGrid(outp, e, reso = 60, type = "abu")
outp <- SpGeoCodH(inp)
e <- c(42, 52, -27, -10)
lemurs_div <- RichnessGrid(outp, e, reso = 60, type = "spnum")
MapGrid(lemurs_div)
Run the code above in your browser using DataLab