Running the analysis
Fit the models - Step 13/14
> map.future<-stack("krameri.1/proj_future/proj_future_krameri.1_ensemble.gri")
> plot(map.future[[2]], col=palette_MAXENT(0, 1000, 100)[[1]], breaks=palette_MAXENT(0, 1000, 100)[[2]])

These two maps are the ensemble SDMs for current and future climatic conditions obtained from the first replicates. To obtain our final model we need to fit an ensemble SDM models using all the three replicates.