if (FALSE) {
# Loading data
data(Env)
data(Occurrences)
# SSDM building
SSDM <- stack_modelling(c('CTA', 'SVM'), Occurrences, Env, rep = 1,
Xcol = 'LONGITUDE', Ycol = 'LATITUDE',
Spcol = 'SPECIES')
# Diversity mapping
mapDiversity(SSDM, mathod = 'pSSDM')
}
Run the code above in your browser using DataLab