R Markdown

This is an R Markdown document. Markdown is a simple formatting syntax for authoring HTML, PDF, and MS Word documents. For more details on using R Markdown see http://rmarkdown.rstudio.com.

When you click the Knit button a document will be generated that includes both content as well as the output of any embedded R code chunks within the document. You can embed an R code chunk like this:

summary(cars)
##      speed           dist       
##  Min.   : 4.0   Min.   :  2.00  
##  1st Qu.:12.0   1st Qu.: 26.00  
##  Median :15.0   Median : 36.00  
##  Mean   :15.4   Mean   : 42.98  
##  3rd Qu.:19.0   3rd Qu.: 56.00  
##  Max.   :25.0   Max.   :120.00

Including Plots

You can also embed plots, for example:

Note that the echo = FALSE parameter was added to the code chunk to prevent printing of the R code that generated the plot.

Ben Amar Charaf Eddine 8 April 2019

summary: the final project came with a goal of aplying the methods and the concepts we learned in class,during the course of Geomatics in this semester and ally those techniques on the domain of conservation management.in my project i will follow the first path of the work Multispecies preliminary conservation assessments from distribution data" and I will use the ConR package to realize that.my work will based on the question of “how it is the situation of an organism from geographicly dustributed data?”the path 1 oblige us to use the ConR package because it helps with on the large georaphical parametres by supplying libraries to execute process that deals with that.

library(sf)
## Linking to GEOS 3.6.1, GDAL 2.2.3, PROJ 4.9.3
library(raster)
## Loading required package: sp
library(tidyverse)
## -- Attaching packages ---------------------------------- tidyverse 1.2.1 --
## v ggplot2 3.1.0       v purrr   0.3.2  
## v tibble  2.1.1       v dplyr   0.8.0.1
## v tidyr   0.8.3       v stringr 1.4.0  
## v readr   1.3.1       v forcats 0.4.0
## -- Conflicts ------------------------------------- tidyverse_conflicts() --
## x tidyr::extract() masks raster::extract()
## x dplyr::filter()  masks stats::filter()
## x dplyr::lag()     masks stats::lag()
## x dplyr::select()  masks raster::select()
#install.packages("ConR")
library(sp)
library(ConR)

when I wanted to download the data I used the GBIF website it was a fantastic source to get huge data concerning the biodiversity field, I downloaded the data related to my specie and the country I have chosen through the rbig R package .i registered in the website and I have searched for some species that live in the Amazonia ,and then I have got the notification of the download, the link of downloading of the data I used is http://api.gbif.org/v1/occurrence/download/request/0045549-181108115102211.zip ,and through the upcoming process you will see how I implemented that and all the process of unzipping

#install.packages("rgbif")
library(rgbif)

Ben Amar Charaf Eddine 8 April 2019

summary: the final project came with a goal of aplying the methods and the concepts we learned in class,during the course of Geomatics in this semester and ally those techniques on the domain of conservation management.in my project i will follow the first path of the work Multispecies preliminary conservation assessments from distribution data" and I will use the ConR package to realize that.my work will based on the question of “how it is the situation of an organism from geographicly dustributed data?”the path 1 oblige us to use the ConR package because it helps with on the large georaphical parametres by supplying libraries to execute process that deals with that.

library(sf)
library(raster)
library(tidyverse)
#install.packages("ConR")
library(sp)
library(ConR)

when I wanted to download the data I used the GBIF website it was a fantastic source to get huge data concerning the biodiversity field, I downloaded the data related to my specie and the country I have chosen through the rbig R package .i registered in the website and I have searched for some species that live in the Amazonia ,and then I have got the notification of the download, the link of downloading of the data I used is http://api.gbif.org/v1/occurrence/download/request/0045549-181108115102211.zip ,and through the upcoming process you will see how I implemented that and all the process of unzipping

#install.packages("rgbif")
library(rgbif)
library(dplyr)
equ_gbif <- occ_download_get(key = "0045549-181108115102211", overwrite = TRUE) %>% 
    occ_download_import(equ_gbif_download, na.strings = c("", NA))
## Download file size: 2.99 MB
## On disk at C:\Users\Name\Documents\0045549-181108115102211.zip
equ_gbif
## # A tibble: 87,271 x 45
##    gbifID datasetKey occurrenceID kingdom phylum class order family genus
##  *  <int> <chr>      <chr>        <chr>   <chr>  <chr> <chr> <chr>  <chr>
##  1 1.99e9 ad43e954-~ MH306193     Animal~ Chord~ Amph~ Anura Strab~ Pris~
##  2 1.99e9 ad43e954-~ MH306194     Animal~ Chord~ Amph~ Anura Strab~ Pris~
##  3 1.99e9 50c9509d-~ https://www~ Animal~ Chord~ Amph~ Anura Phyll~ Call~
##  4 1.99e9 50c9509d-~ https://www~ Animal~ Chord~ Amph~ Anura Strab~ Pris~
##  5 1.99e9 50c9509d-~ https://www~ Animal~ Chord~ Amph~ Anura Lepto~ Lept~
##  6 1.99e9 50c9509d-~ https://www~ Animal~ Chord~ Amph~ Anura Hylid~ Tepu~
##  7 1.99e9 50c9509d-~ https://www~ Animal~ Chord~ Amph~ Anura Strab~ Pris~
##  8 1.99e9 50c9509d-~ https://www~ Animal~ Chord~ Amph~ Anura Hylid~ Oste~
##  9 1.99e9 50c9509d-~ https://www~ Animal~ Chord~ Amph~ Anura Dendr~ Amee~
## 10 1.99e9 50c9509d-~ https://www~ Animal~ Chord~ Amph~ Anura Strab~ Pris~
## # ... with 87,261 more rows, and 36 more variables: species <chr>,
## #   infraspecificEpithet <chr>, taxonRank <chr>, scientificName <chr>,
## #   countryCode <chr>, locality <chr>, publishingOrgKey <chr>,
## #   decimalLatitude <dbl>, decimalLongitude <dbl>,
## #   coordinateUncertaintyInMeters <dbl>, coordinatePrecision <lgl>,
## #   elevation <dbl>, elevationAccuracy <dbl>, depth <dbl>,
## #   depthAccuracy <dbl>, eventDate <chr>, day <int>, month <int>,
## #   year <int>, taxonKey <int>, speciesKey <int>, basisOfRecord <chr>,
## #   institutionCode <chr>, collectionCode <chr>, catalogNumber <chr>,
## #   recordNumber <chr>, identifiedBy <chr>, dateIdentified <chr>,
## #   license <chr>, rightsHolder <chr>, recordedBy <chr>, typeStatus <chr>,
## #   establishmentMeans <chr>, lastInterpreted <chr>, mediaType <chr>,
## #   issue <chr>
library(tidyverse)
equ_gbif %>% drop_na(kingdom) %>% count(kingdom, sort = TRUE)
## # A tibble: 1 x 2
##   kingdom      n
##   <chr>    <int>
## 1 Animalia 87271
equ_gbif %>% filter(taxonRank == "SPECIES") %>% count(species) %>% arrange(desc(n))
## # A tibble: 568 x 2
##    species                       n
##    <chr>                     <int>
##  1 Dendropsophus triangulum   4631
##  2 Dendropsophus carnifex     3764
##  3 Atelopus ignescens         2763
##  4 Pristimantis w-nigrum      2331
##  5 Pristimantis curtipes      1796
##  6 Pristimantis achatinus     1784
##  7 Pristimantis unistrigatus  1574
##  8 Rhinella margaritifera     1557
##  9 Epipedobates machalilla    1473
## 10 Hypsiboas punctatus        1408
## # ... with 558 more rows
library(tidyverse)
equ_gbif %>% count(taxonRank)
## # A tibble: 6 x 2
##   taxonRank      n
##   <chr>      <int>
## 1 FAMILY       739
## 2 GENUS       8278
## 3 ORDER        102
## 4 SPECIES    78093
## 5 SUBSPECIES    57
## 6 VARIETY        2
equ_gbif %>% count(species, sort = TRUE) %>% drop_na(species) %>% filter(n > 500) %>% 
    ggplot(aes(x = reorder(species, n), y = n, fill = species)) + geom_bar(stat = "identity", 
    show.legend = FALSE) + labs(x = "SPECIES", y = "Number of Occurrence Records (observations)") + 
    coord_flip()

equ_gbif %>% filter(species == " Pristimantis lanthanites")
## # A tibble: 0 x 45
## # ... with 45 variables: gbifID <int>, datasetKey <chr>,
## #   occurrenceID <chr>, kingdom <chr>, phylum <chr>, class <chr>,
## #   order <chr>, family <chr>, genus <chr>, species <chr>,
## #   infraspecificEpithet <chr>, taxonRank <chr>, scientificName <chr>,
## #   countryCode <chr>, locality <chr>, publishingOrgKey <chr>,
## #   decimalLatitude <dbl>, decimalLongitude <dbl>,
## #   coordinateUncertaintyInMeters <dbl>, coordinatePrecision <lgl>,
## #   elevation <dbl>, elevationAccuracy <dbl>, depth <dbl>,
## #   depthAccuracy <dbl>, eventDate <chr>, day <int>, month <int>,
## #   year <int>, taxonKey <int>, speciesKey <int>, basisOfRecord <chr>,
## #   institutionCode <chr>, collectionCode <chr>, catalogNumber <chr>,
## #   recordNumber <chr>, identifiedBy <chr>, dateIdentified <chr>,
## #   license <chr>, rightsHolder <chr>, recordedBy <chr>, typeStatus <chr>,
## #   establishmentMeans <chr>, lastInterpreted <chr>, mediaType <chr>,
## #   issue <chr>
Pristimantis <- equ_gbif %>% dplyr::filter(genus == "Pristimantis") %>%
  select(decimalLatitude, decimalLongitude, species)
print(Pristimantis)
## # A tibble: 20,781 x 3
##    decimalLatitude decimalLongitude species                    
##              <dbl>            <dbl> <chr>                      
##  1         -0.03              -78.7 <NA>                       
##  2         -0.03              -78.7 <NA>                       
##  3          0.0530            -78.8 Pristimantis achatinus     
##  4         -0.0156            -78.7 Pristimantis appendiculatus
##  5         -4.60              -78.8 <NA>                       
##  6         -2.07              -78.2 Pristimantis ganonotus     
##  7         -1.10              -76.7 Pristimantis diadematus    
##  8         -4.46              -78.8 Pristimantis katoptroides  
##  9         -0.231             -78.4 Pristimantis unistrigatus  
## 10         -0.728             -77.7 Pristimantis galdi         
## # ... with 20,771 more rows
EOO.results <- EOO.computing(Pristimantis, export_shp = T)
## [1] "Skipping 3616 occurrences because of missing coordinates for c(\"Pristimantis vertebralis\", \"Pristimantis lanthanites\", \"Pristimantis peruvianus\", \"Pristimantis altamazonicus\", \"Pristimantis variabilis\", \"Pristimantis unistrigatus\", \"Pristimantis achatinus\", \"Pristimantis croceoinguinis\", \"Pristimantis actites\", \"Pristimantis calcarulatus\", \"Pristimantis chloronotus\", \"Pristimantis duellmani\", \"Pristimantis celator\", \"Pristimantis caprifer\", \"Pristimantis yantzaza\", \"Pristimantis curtipes\", \"Pristimantis w-nigrum\", \"Pristimantis conspicillatus\", NA, \"Pristimantis walkeri\", \n\"Pristimantis rosadoi\", \"Pristimantis eremitus\", \"Pristimantis ornatissimus\", \"Pristimantis lymani\", \"Pristimantis glandulosus\", \"Pristimantis devillei\", \"Pristimantis librarius\", \"Pristimantis lacrimosus\", \"Pristimantis malkini\", \"Pristimantis surdus\", \"Pristimantis ockendeni\", \"Pristimantis quaquaversus\", \"Pristimantis acuminatus\", \"Pristimantis petersi\", \"Pristimantis ventrimarmoratus\", \"Pristimantis waoranii\", \"Pristimantis galdi\", \"Pristimantis floridus\", \"Pristimantis labiosus\", \"Pristimantis leoni\", \n\"Pristimantis orcesi\", \"Pristimantis crenunguis\", \"Pristimantis chalceus\", \"Pristimantis versicolor\", \"Pristimantis pugnax\", \"Pristimantis latidiscus\", \"Pristimantis martiae\", \"Pristimantis cryophilius\", \"Pristimantis riveti\", \"Pristimantis nyctophylax\", \"Pristimantis festae\", \"Pristimantis crucifer\", \"Pristimantis buckleyi\", \"Pristimantis subsigillatus\", \"Pristimantis trachyblepharis\", \"Pristimantis bisignatus\", \"Pristimantis thymelensis\", \"Pristimantis ocreatus\", \"Pristimantis supernatis\", \"Pristimantis prolatus\", \n\"Pristimantis altamnis\", \"Pristimantis vidua\", \"Pristimantis truebae\", \"Pristimantis spinosus\", \"Pristimantis cajamarcensis\", \"Pristimantis percultus\", \"Pristimantis colodactylus\", \"Pristimantis proserpens\", \"Pristimantis nigrogriseus\", \"Pristimantis leucopus\", \"Pristimantis balionotus\", \"Pristimantis incomptus\", \"Pristimantis phoxocephalus\", \"Pristimantis calcaratus\", \"Pristimantis quinquagesimus\", \"Pristimantis tenebrionis\", \"Pristimantis pteridophilus\", \"Pristimantis rubicundus\", \"Pristimantis kichwarum\", \n\"Pristimantis pycnodermis\", \"Pristimantis atratus\", \"Pristimantis inusitatus\", \"Pristimantis eriphus\", \"Pristimantis ignicolor\", \"Pristimantis orestes\", \"Pristimantis exoristus\", \"Pristimantis pecki\", \"Pristimantis cryptomelas\", \"Pristimantis condor\", \"Pristimantis bromeliaceus\", \"Pristimantis acerus\", \"Pristimantis gladiator\", \"Pristimantis modipeplus\", \"Pristimantis diadematus\", \"Pristimantis aureolineatus\", \"Pristimantis metabates\", \"Pristimantis luteolateralis\", \"Pristimantis paululus\", \"Pristimantis ernesti\", \n\"Pristimantis ruidus\", \"Pristimantis parvillus\", \"Pristimantis muricatus\", \"Pristimantis delius\", \"Pristimantis cremnobates\", \"Pristimantis appendiculatus\", \"Pristimantis achuar\", \"Pristimantis ganonotus\", \"Pristimantis pseudoacuminatus\")"
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis apiculatus is not
## computed because there is only 1 unique occurrence
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis aureolineatus is not
## computed because there is less than 3 unique occurrences
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis balionotus is not
## computed because there is only 1 unique occurrence
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis bicantus is not
## computed because there is only 1 unique occurrence
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis carvalhoi is not
## computed because there is only 1 unique occurrence
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis citriogaster is not
## computed because there is less than 3 unique occurrences
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis colomai is not computed
## because there is only 1 unique occurrence
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis dissimulatus is not
## computed because there is less than 3 unique occurrences
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis ernesti is not computed
## because there is less than 3 unique occurrences
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis eugeniae is not
## computed because there is less than 3 unique occurrences
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis fenestratus is not
## computed because there is only 1 unique occurrence
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis frater is not computed
## because there is only 1 unique occurrence
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis ganonotus is not
## computed because there is less than 3 unique occurrences
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis hamiotae is not
## computed because there is less than 3 unique occurrences
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis hectus is not computed
## because there is only 1 unique occurrence
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis ignicolor is not
## computed because there is less than 3 unique occurrences
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis inusitatus is not
## computed because there is less than 3 unique occurrences
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis katoptroides is not
## computed because there is less than 3 unique occurrences
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis kirklandi is not
## computed because there is only 1 unique occurrence
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis laticlavius is not
## computed because there is only 1 unique occurrence
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis latro is not computed
## because there is less than 3 unique occurrences
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis loustes is not computed
## because there is only 1 unique occurrence
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis luscombei is not
## computed because there is only 1 unique occurrence
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis matidiktyo is not
## computed because there is less than 3 unique occurrences
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis miktos is not computed
## because there is only 1 unique occurrence
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis nimbus is not computed
## because there is less than 3 unique occurrences
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis ocellatus is not
## computed because there is only 1 unique occurrence
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis ocreatus is not
## computed because there is less than 3 unique occurrences
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis pastazensis is not
## computed because there is less than 3 unique occurrences
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis philipi is not computed
## because there is only 1 unique occurrence
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis prometeii is not
## computed because there is only 1 unique occurrence
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis rosadoi is not computed
## because there is less than 3 unique occurrences
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis scolodiscus is not
## computed because there is less than 3 unique occurrences
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis simonbolivari is not
## computed because there is less than 3 unique occurrences
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis skydmainos is not
## computed because there is only 1 unique occurrence
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis waoranii is not
## computed because there is only 1 unique occurrence
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis yantzaza is not
## computed because there is only 1 unique occurrence
summary(EOO.results)
##                               Length Class  Mode   
## Pristimantis acerus           2      -none- list   
## Pristimantis achatinus        2      -none- list   
## Pristimantis achuar           2      -none- list   
## Pristimantis actites          2      -none- list   
## Pristimantis acuminatus       2      -none- list   
## Pristimantis altamazonicus    2      -none- list   
## Pristimantis altamnis         2      -none- list   
## Pristimantis apiculatus       1      -none- numeric
## Pristimantis appendiculatus   2      -none- list   
## Pristimantis atratus          2      -none- list   
## Pristimantis aureolineatus    1      -none- numeric
## Pristimantis balionotus       1      -none- numeric
## Pristimantis baryecuus        2      -none- list   
## Pristimantis bicantus         1      -none- numeric
## Pristimantis bromeliaceus     2      -none- list   
## Pristimantis buckleyi         2      -none- list   
## Pristimantis cajamarcensis    2      -none- list   
## Pristimantis calcaratus       2      -none- list   
## Pristimantis calcarulatus     2      -none- list   
## Pristimantis caprifer         2      -none- list   
## Pristimantis carvalhoi        1      -none- numeric
## Pristimantis celator          2      -none- list   
## Pristimantis chalceus         2      -none- list   
## Pristimantis chloronotus      2      -none- list   
## Pristimantis citriogaster     1      -none- numeric
## Pristimantis colodactylus     2      -none- list   
## Pristimantis colomai          1      -none- numeric
## Pristimantis condor           2      -none- list   
## Pristimantis conspicillatus   2      -none- list   
## Pristimantis cremnobates      2      -none- list   
## Pristimantis crenunguis       2      -none- list   
## Pristimantis croceoinguinis   2      -none- list   
## Pristimantis crucifer         2      -none- list   
## Pristimantis cryophilius      2      -none- list   
## Pristimantis cryptomelas      2      -none- list   
## Pristimantis curtipes         2      -none- list   
## Pristimantis delius           2      -none- list   
## Pristimantis devillei         2      -none- list   
## Pristimantis diadematus       2      -none- list   
## Pristimantis dissimulatus     1      -none- numeric
## Pristimantis duellmani        2      -none- list   
## Pristimantis eremitus         2      -none- list   
## Pristimantis eriphus          2      -none- list   
## Pristimantis ernesti          1      -none- numeric
## Pristimantis eugeniae         1      -none- numeric
## Pristimantis fenestratus      1      -none- numeric
## Pristimantis festae           2      -none- list   
## Pristimantis floridus         2      -none- list   
## Pristimantis frater           1      -none- numeric
## Pristimantis galdi            2      -none- list   
## Pristimantis ganonotus        1      -none- numeric
## Pristimantis gentryi          2      -none- list   
## Pristimantis gladiator        2      -none- list   
## Pristimantis glandulosus      2      -none- list   
## Pristimantis hamiotae         1      -none- numeric
## Pristimantis hectus           1      -none- numeric
## Pristimantis ignicolor        1      -none- numeric
## Pristimantis illotus          2      -none- list   
## Pristimantis incanus          2      -none- list   
## Pristimantis incomptus        2      -none- list   
## Pristimantis inusitatus       1      -none- numeric
## Pristimantis katoptroides     1      -none- numeric
## Pristimantis kichwarum        2      -none- list   
## Pristimantis kirklandi        1      -none- numeric
## Pristimantis labiosus         2      -none- list   
## Pristimantis lacrimosus       2      -none- list   
## Pristimantis lanthanites      2      -none- list   
## Pristimantis laticlavius      1      -none- numeric
## Pristimantis latidiscus       2      -none- list   
## Pristimantis latro            1      -none- numeric
## Pristimantis leoni            2      -none- list   
## Pristimantis leucopus         2      -none- list   
## Pristimantis librarius        2      -none- list   
## Pristimantis lividus          2      -none- list   
## Pristimantis loustes          1      -none- numeric
## Pristimantis luscombei        1      -none- numeric
## Pristimantis luteolateralis   2      -none- list   
## Pristimantis lymani           2      -none- list   
## Pristimantis malkini          2      -none- list   
## Pristimantis martiae          2      -none- list   
## Pristimantis matidiktyo       1      -none- numeric
## Pristimantis miktos           1      -none- numeric
## Pristimantis modipeplus       2      -none- list   
## Pristimantis muricatus        2      -none- list   
## Pristimantis nigrogriseus     2      -none- list   
## Pristimantis nimbus           1      -none- numeric
## Pristimantis nyctophylax      2      -none- list   
## Pristimantis ocellatus        1      -none- numeric
## Pristimantis ockendeni        2      -none- list   
## Pristimantis ocreatus         1      -none- numeric
## Pristimantis orcesi           2      -none- list   
## Pristimantis orestes          2      -none- list   
## Pristimantis ornatissimus     2      -none- list   
## Pristimantis orphnolaimus     2      -none- list   
## Pristimantis parvillus        2      -none- list   
## Pristimantis pastazensis      1      -none- numeric
## Pristimantis paululus         2      -none- list   
## Pristimantis peruvianus       2      -none- list   
## Pristimantis petersi          2      -none- list   
## Pristimantis philipi          1      -none- numeric
## Pristimantis phoxocephalus    2      -none- list   
## Pristimantis prolatus         2      -none- list   
## Pristimantis prometeii        1      -none- numeric
## Pristimantis proserpens       2      -none- list   
## Pristimantis pseudoacuminatus 2      -none- list   
## Pristimantis pteridophilus    2      -none- list   
## Pristimantis pugnax           2      -none- list   
## Pristimantis pycnodermis      2      -none- list   
## Pristimantis pyrrhomerus      2      -none- list   
## Pristimantis quaquaversus     2      -none- list   
## Pristimantis quinquagesimus   2      -none- list   
## Pristimantis riveti           2      -none- list   
## Pristimantis rosadoi          1      -none- numeric
## Pristimantis rubicundus       2      -none- list   
## Pristimantis scolodiscus      1      -none- numeric
## Pristimantis simonbolivari    1      -none- numeric
## Pristimantis skydmainos       1      -none- numeric
## Pristimantis sobetes          2      -none- list   
## Pristimantis spinosus         2      -none- list   
## Pristimantis subsigillatus    2      -none- list   
## Pristimantis supernatis       2      -none- list   
## Pristimantis surdus           2      -none- list   
## Pristimantis tenebrionis      2      -none- list   
## Pristimantis thymalopsoides   2      -none- list   
## Pristimantis thymelensis      2      -none- list   
## Pristimantis trachyblepharis  2      -none- list   
## Pristimantis trepidotus       2      -none- list   
## Pristimantis truebae          2      -none- list   
## Pristimantis unistrigatus     2      -none- list   
## Pristimantis variabilis       2      -none- list   
## Pristimantis ventrimarmoratus 2      -none- list   
## Pristimantis verecundus       2      -none- list   
## Pristimantis versicolor       2      -none- list   
## Pristimantis vertebralis      2      -none- list   
## Pristimantis vidua            2      -none- list   
## Pristimantis w-nigrum         2      -none- list   
## Pristimantis walkeri          2      -none- list   
## Pristimantis waoranii         1      -none- numeric
## Pristimantis yantzaza         1      -none- numeric
library(rnaturalearth)
library(sp)

#world countries
sp::plot(ne_countries(country='ecuador'), border="black", 
         main="EOO for Pristimantis lanthanites - Convex Hull")
sp::plot(EOO.results[[7]][[2]], col="orange", add=TRUE)

#install.packages("alphahull")
library(alphahull)
EOO.results2 <- EOO.computing(Pristimantis, method.range = "alpha.hull",
                              export_shp = T, alpha=3) 
## [1] "Skipping 3616 occurrences because of missing coordinates for c(\"Pristimantis vertebralis\", \"Pristimantis lanthanites\", \"Pristimantis peruvianus\", \"Pristimantis altamazonicus\", \"Pristimantis variabilis\", \"Pristimantis unistrigatus\", \"Pristimantis achatinus\", \"Pristimantis croceoinguinis\", \"Pristimantis actites\", \"Pristimantis calcarulatus\", \"Pristimantis chloronotus\", \"Pristimantis duellmani\", \"Pristimantis celator\", \"Pristimantis caprifer\", \"Pristimantis yantzaza\", \"Pristimantis curtipes\", \"Pristimantis w-nigrum\", \"Pristimantis conspicillatus\", NA, \"Pristimantis walkeri\", \n\"Pristimantis rosadoi\", \"Pristimantis eremitus\", \"Pristimantis ornatissimus\", \"Pristimantis lymani\", \"Pristimantis glandulosus\", \"Pristimantis devillei\", \"Pristimantis librarius\", \"Pristimantis lacrimosus\", \"Pristimantis malkini\", \"Pristimantis surdus\", \"Pristimantis ockendeni\", \"Pristimantis quaquaversus\", \"Pristimantis acuminatus\", \"Pristimantis petersi\", \"Pristimantis ventrimarmoratus\", \"Pristimantis waoranii\", \"Pristimantis galdi\", \"Pristimantis floridus\", \"Pristimantis labiosus\", \"Pristimantis leoni\", \n\"Pristimantis orcesi\", \"Pristimantis crenunguis\", \"Pristimantis chalceus\", \"Pristimantis versicolor\", \"Pristimantis pugnax\", \"Pristimantis latidiscus\", \"Pristimantis martiae\", \"Pristimantis cryophilius\", \"Pristimantis riveti\", \"Pristimantis nyctophylax\", \"Pristimantis festae\", \"Pristimantis crucifer\", \"Pristimantis buckleyi\", \"Pristimantis subsigillatus\", \"Pristimantis trachyblepharis\", \"Pristimantis bisignatus\", \"Pristimantis thymelensis\", \"Pristimantis ocreatus\", \"Pristimantis supernatis\", \"Pristimantis prolatus\", \n\"Pristimantis altamnis\", \"Pristimantis vidua\", \"Pristimantis truebae\", \"Pristimantis spinosus\", \"Pristimantis cajamarcensis\", \"Pristimantis percultus\", \"Pristimantis colodactylus\", \"Pristimantis proserpens\", \"Pristimantis nigrogriseus\", \"Pristimantis leucopus\", \"Pristimantis balionotus\", \"Pristimantis incomptus\", \"Pristimantis phoxocephalus\", \"Pristimantis calcaratus\", \"Pristimantis quinquagesimus\", \"Pristimantis tenebrionis\", \"Pristimantis pteridophilus\", \"Pristimantis rubicundus\", \"Pristimantis kichwarum\", \n\"Pristimantis pycnodermis\", \"Pristimantis atratus\", \"Pristimantis inusitatus\", \"Pristimantis eriphus\", \"Pristimantis ignicolor\", \"Pristimantis orestes\", \"Pristimantis exoristus\", \"Pristimantis pecki\", \"Pristimantis cryptomelas\", \"Pristimantis condor\", \"Pristimantis bromeliaceus\", \"Pristimantis acerus\", \"Pristimantis gladiator\", \"Pristimantis modipeplus\", \"Pristimantis diadematus\", \"Pristimantis aureolineatus\", \"Pristimantis metabates\", \"Pristimantis luteolateralis\", \"Pristimantis paululus\", \"Pristimantis ernesti\", \n\"Pristimantis ruidus\", \"Pristimantis parvillus\", \"Pristimantis muricatus\", \"Pristimantis delius\", \"Pristimantis cremnobates\", \"Pristimantis appendiculatus\", \"Pristimantis achuar\", \"Pristimantis ganonotus\", \"Pristimantis pseudoacuminatus\")"
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis apiculatus is not
## computed because there is only 1 unique occurrence
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis aureolineatus is not
## computed because there is less than 3 unique occurrences
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis balionotus is not
## computed because there is only 1 unique occurrence
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis bicantus is not
## computed because there is only 1 unique occurrence
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis carvalhoi is not
## computed because there is only 1 unique occurrence
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis citriogaster is not
## computed because there is less than 3 unique occurrences
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis colomai is not computed
## because there is only 1 unique occurrence
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis dissimulatus is not
## computed because there is less than 3 unique occurrences
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis ernesti is not computed
## because there is less than 3 unique occurrences
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis eugeniae is not
## computed because there is less than 3 unique occurrences
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis fenestratus is not
## computed because there is only 1 unique occurrence
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis frater is not computed
## because there is only 1 unique occurrence
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis ganonotus is not
## computed because there is less than 3 unique occurrences
## Warning in tri.mesh(X): success: collinearities reduced through jitter
## Warning in tri.mesh(X): dataset started with 3 colinear points, jitter
## added!
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis hamiotae is not
## computed because there is less than 3 unique occurrences
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis hectus is not computed
## because there is only 1 unique occurrence
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis ignicolor is not
## computed because there is less than 3 unique occurrences
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis inusitatus is not
## computed because there is less than 3 unique occurrences
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis katoptroides is not
## computed because there is less than 3 unique occurrences
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis kirklandi is not
## computed because there is only 1 unique occurrence
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis laticlavius is not
## computed because there is only 1 unique occurrence
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis latro is not computed
## because there is less than 3 unique occurrences
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis loustes is not computed
## because there is only 1 unique occurrence
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis luscombei is not
## computed because there is only 1 unique occurrence
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis matidiktyo is not
## computed because there is less than 3 unique occurrences
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis miktos is not computed
## because there is only 1 unique occurrence
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis nimbus is not computed
## because there is less than 3 unique occurrences
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis ocellatus is not
## computed because there is only 1 unique occurrence
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis ocreatus is not
## computed because there is less than 3 unique occurrences
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis pastazensis is not
## computed because there is less than 3 unique occurrences
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis philipi is not computed
## because there is only 1 unique occurrence
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis prometeii is not
## computed because there is only 1 unique occurrence
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis rosadoi is not computed
## because there is less than 3 unique occurrences
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis scolodiscus is not
## computed because there is less than 3 unique occurrences
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis simonbolivari is not
## computed because there is less than 3 unique occurrences
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis skydmainos is not
## computed because there is only 1 unique occurrence
## Warning in tri.mesh(X): success: collinearities reduced through jitter
## Warning in tri.mesh(X): dataset started with 3 colinear points, jitter
## added!
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis waoranii is not
## computed because there is only 1 unique occurrence
## Warning in .EOO.comp(x, Name_Sp = ifelse(ncol(XY) > 2,
## as.character(unique(x$tax)), : EOO for Pristimantis yantzaza is not
## computed because there is only 1 unique occurrence
summary(EOO.results2)
##                               Length Class  Mode   
## Pristimantis acerus           2      -none- list   
## Pristimantis achatinus        2      -none- list   
## Pristimantis achuar           2      -none- list   
## Pristimantis actites          2      -none- list   
## Pristimantis acuminatus       2      -none- list   
## Pristimantis altamazonicus    2      -none- list   
## Pristimantis altamnis         2      -none- list   
## Pristimantis apiculatus       1      -none- numeric
## Pristimantis appendiculatus   2      -none- list   
## Pristimantis atratus          2      -none- list   
## Pristimantis aureolineatus    1      -none- numeric
## Pristimantis balionotus       1      -none- numeric
## Pristimantis baryecuus        2      -none- list   
## Pristimantis bicantus         1      -none- numeric
## Pristimantis bromeliaceus     2      -none- list   
## Pristimantis buckleyi         2      -none- list   
## Pristimantis cajamarcensis    2      -none- list   
## Pristimantis calcaratus       2      -none- list   
## Pristimantis calcarulatus     2      -none- list   
## Pristimantis caprifer         2      -none- list   
## Pristimantis carvalhoi        1      -none- numeric
## Pristimantis celator          2      -none- list   
## Pristimantis chalceus         2      -none- list   
## Pristimantis chloronotus      2      -none- list   
## Pristimantis citriogaster     1      -none- numeric
## Pristimantis colodactylus     2      -none- list   
## Pristimantis colomai          1      -none- numeric
## Pristimantis condor           2      -none- list   
## Pristimantis conspicillatus   2      -none- list   
## Pristimantis cremnobates      2      -none- list   
## Pristimantis crenunguis       2      -none- list   
## Pristimantis croceoinguinis   2      -none- list   
## Pristimantis crucifer         2      -none- list   
## Pristimantis cryophilius      2      -none- list   
## Pristimantis cryptomelas      2      -none- list   
## Pristimantis curtipes         2      -none- list   
## Pristimantis delius           2      -none- list   
## Pristimantis devillei         2      -none- list   
## Pristimantis diadematus       2      -none- list   
## Pristimantis dissimulatus     1      -none- numeric
## Pristimantis duellmani        2      -none- list   
## Pristimantis eremitus         2      -none- list   
## Pristimantis eriphus          2      -none- list   
## Pristimantis ernesti          1      -none- numeric
## Pristimantis eugeniae         1      -none- numeric
## Pristimantis fenestratus      1      -none- numeric
## Pristimantis festae           2      -none- list   
## Pristimantis floridus         2      -none- list   
## Pristimantis frater           1      -none- numeric
## Pristimantis galdi            2      -none- list   
## Pristimantis ganonotus        1      -none- numeric
## Pristimantis gentryi          2      -none- list   
## Pristimantis gladiator        2      -none- list   
## Pristimantis glandulosus      2      -none- list   
## Pristimantis hamiotae         1      -none- numeric
## Pristimantis hectus           1      -none- numeric
## Pristimantis ignicolor        1      -none- numeric
## Pristimantis illotus          2      -none- list   
## Pristimantis incanus          2      -none- list   
## Pristimantis incomptus        2      -none- list   
## Pristimantis inusitatus       1      -none- numeric
## Pristimantis katoptroides     1      -none- numeric
## Pristimantis kichwarum        2      -none- list   
## Pristimantis kirklandi        1      -none- numeric
## Pristimantis labiosus         2      -none- list   
## Pristimantis lacrimosus       2      -none- list   
## Pristimantis lanthanites      2      -none- list   
## Pristimantis laticlavius      1      -none- numeric
## Pristimantis latidiscus       2      -none- list   
## Pristimantis latro            1      -none- numeric
## Pristimantis leoni            2      -none- list   
## Pristimantis leucopus         2      -none- list   
## Pristimantis librarius        2      -none- list   
## Pristimantis lividus          2      -none- list   
## Pristimantis loustes          1      -none- numeric
## Pristimantis luscombei        1      -none- numeric
## Pristimantis luteolateralis   2      -none- list   
## Pristimantis lymani           2      -none- list   
## Pristimantis malkini          2      -none- list   
## Pristimantis martiae          2      -none- list   
## Pristimantis matidiktyo       1      -none- numeric
## Pristimantis miktos           1      -none- numeric
## Pristimantis modipeplus       2      -none- list   
## Pristimantis muricatus        2      -none- list   
## Pristimantis nigrogriseus     2      -none- list   
## Pristimantis nimbus           1      -none- numeric
## Pristimantis nyctophylax      2      -none- list   
## Pristimantis ocellatus        1      -none- numeric
## Pristimantis ockendeni        2      -none- list   
## Pristimantis ocreatus         1      -none- numeric
## Pristimantis orcesi           2      -none- list   
## Pristimantis orestes          2      -none- list   
## Pristimantis ornatissimus     2      -none- list   
## Pristimantis orphnolaimus     2      -none- list   
## Pristimantis parvillus        2      -none- list   
## Pristimantis pastazensis      1      -none- numeric
## Pristimantis paululus         2      -none- list   
## Pristimantis peruvianus       2      -none- list   
## Pristimantis petersi          2      -none- list   
## Pristimantis philipi          1      -none- numeric
## Pristimantis phoxocephalus    2      -none- list   
## Pristimantis prolatus         2      -none- list   
## Pristimantis prometeii        1      -none- numeric
## Pristimantis proserpens       2      -none- list   
## Pristimantis pseudoacuminatus 2      -none- list   
## Pristimantis pteridophilus    2      -none- list   
## Pristimantis pugnax           2      -none- list   
## Pristimantis pycnodermis      2      -none- list   
## Pristimantis pyrrhomerus      2      -none- list   
## Pristimantis quaquaversus     2      -none- list   
## Pristimantis quinquagesimus   2      -none- list   
## Pristimantis riveti           2      -none- list   
## Pristimantis rosadoi          1      -none- numeric
## Pristimantis rubicundus       2      -none- list   
## Pristimantis scolodiscus      1      -none- numeric
## Pristimantis simonbolivari    1      -none- numeric
## Pristimantis skydmainos       1      -none- numeric
## Pristimantis sobetes          2      -none- list   
## Pristimantis spinosus         2      -none- list   
## Pristimantis subsigillatus    2      -none- list   
## Pristimantis supernatis       2      -none- list   
## Pristimantis surdus           2      -none- list   
## Pristimantis tenebrionis      2      -none- list   
## Pristimantis thymalopsoides   2      -none- list   
## Pristimantis thymelensis      2      -none- list   
## Pristimantis trachyblepharis  2      -none- list   
## Pristimantis trepidotus       2      -none- list   
## Pristimantis truebae          2      -none- list   
## Pristimantis unistrigatus     2      -none- list   
## Pristimantis variabilis       2      -none- list   
## Pristimantis ventrimarmoratus 2      -none- list   
## Pristimantis verecundus       2      -none- list   
## Pristimantis versicolor       2      -none- list   
## Pristimantis vertebralis      2      -none- list   
## Pristimantis vidua            2      -none- list   
## Pristimantis w-nigrum         2      -none- list   
## Pristimantis walkeri          2      -none- list   
## Pristimantis waoranii         1      -none- numeric
## Pristimantis yantzaza         1      -none- numeric
#
sp::plot(EOO.results2[[7]][[2]], col="green", main="EOO for Pristimantis lanthanites - Alpha Hull")
sp::plot(ne_countries(country='ecuador'), border="black", add=TRUE)

SUB <- subpop.comp(Pristimantis, Resol_sub_pop=50)
## [1] "Skipping 3616 occurrences because of missing coordinates for c(\"Pristimantis vertebralis\", \"Pristimantis lanthanites\", \"Pristimantis peruvianus\", \"Pristimantis altamazonicus\", \"Pristimantis variabilis\", \"Pristimantis unistrigatus\", \"Pristimantis achatinus\", \"Pristimantis croceoinguinis\", \"Pristimantis actites\", \"Pristimantis calcarulatus\", \"Pristimantis chloronotus\", \"Pristimantis duellmani\", \"Pristimantis celator\", \"Pristimantis caprifer\", \"Pristimantis yantzaza\", \"Pristimantis curtipes\", \"Pristimantis w-nigrum\", \"Pristimantis conspicillatus\", NA, \"Pristimantis walkeri\", \n\"Pristimantis rosadoi\", \"Pristimantis eremitus\", \"Pristimantis ornatissimus\", \"Pristimantis lymani\", \"Pristimantis glandulosus\", \"Pristimantis devillei\", \"Pristimantis librarius\", \"Pristimantis lacrimosus\", \"Pristimantis malkini\", \"Pristimantis surdus\", \"Pristimantis ockendeni\", \"Pristimantis quaquaversus\", \"Pristimantis acuminatus\", \"Pristimantis petersi\", \"Pristimantis ventrimarmoratus\", \"Pristimantis waoranii\", \"Pristimantis galdi\", \"Pristimantis floridus\", \"Pristimantis labiosus\", \"Pristimantis leoni\", \n\"Pristimantis orcesi\", \"Pristimantis crenunguis\", \"Pristimantis chalceus\", \"Pristimantis versicolor\", \"Pristimantis pugnax\", \"Pristimantis latidiscus\", \"Pristimantis martiae\", \"Pristimantis cryophilius\", \"Pristimantis riveti\", \"Pristimantis nyctophylax\", \"Pristimantis festae\", \"Pristimantis crucifer\", \"Pristimantis buckleyi\", \"Pristimantis subsigillatus\", \"Pristimantis trachyblepharis\", \"Pristimantis bisignatus\", \"Pristimantis thymelensis\", \"Pristimantis ocreatus\", \"Pristimantis supernatis\", \"Pristimantis prolatus\", \n\"Pristimantis altamnis\", \"Pristimantis vidua\", \"Pristimantis truebae\", \"Pristimantis spinosus\", \"Pristimantis cajamarcensis\", \"Pristimantis percultus\", \"Pristimantis colodactylus\", \"Pristimantis proserpens\", \"Pristimantis nigrogriseus\", \"Pristimantis leucopus\", \"Pristimantis balionotus\", \"Pristimantis incomptus\", \"Pristimantis phoxocephalus\", \"Pristimantis calcaratus\", \"Pristimantis quinquagesimus\", \"Pristimantis tenebrionis\", \"Pristimantis pteridophilus\", \"Pristimantis rubicundus\", \"Pristimantis kichwarum\", \n\"Pristimantis pycnodermis\", \"Pristimantis atratus\", \"Pristimantis inusitatus\", \"Pristimantis eriphus\", \"Pristimantis ignicolor\", \"Pristimantis orestes\", \"Pristimantis exoristus\", \"Pristimantis pecki\", \"Pristimantis cryptomelas\", \"Pristimantis condor\", \"Pristimantis bromeliaceus\", \"Pristimantis acerus\", \"Pristimantis gladiator\", \"Pristimantis modipeplus\", \"Pristimantis diadematus\", \"Pristimantis aureolineatus\", \"Pristimantis metabates\", \"Pristimantis luteolateralis\", \"Pristimantis paululus\", \"Pristimantis ernesti\", \n\"Pristimantis ruidus\", \"Pristimantis parvillus\", \"Pristimantis muricatus\", \"Pristimantis delius\", \"Pristimantis cremnobates\", \"Pristimantis appendiculatus\", \"Pristimantis achuar\", \"Pristimantis ganonotus\", \"Pristimantis pseudoacuminatus\")"
SUB
## $`Pristimantis acerus`
## $`Pristimantis acerus`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis acerus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -78.66582, -77.58835, -1.418948, 0.08940913  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis achatinus`
## $`Pristimantis achatinus`$`Number of subpopulation`
## [1] 2
## 
## $`Pristimantis achatinus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -81.26006, -76.71754, -4.668178, 1.694  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis achuar`
## $`Pristimantis achuar`$`Number of subpopulation`
## [1] 2
## 
## $`Pristimantis achuar`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -77.30916, -75.95084, -2.992699, -0.2278003  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis actites`
## $`Pristimantis actites`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis actites`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.49916, -78.16751, -1.418948, 0.2933062  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis acuminatus`
## $`Pristimantis acuminatus`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis acuminatus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -78.45136, -75.71968, -2.402504, 0.5158015  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis altamazonicus`
## $`Pristimantis altamazonicus`$`Number of subpopulation`
## [1] 2
## 
## $`Pristimantis altamazonicus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -78.68216, -74.96084, -3.93611, 0.9188851  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis altamnis`
## $`Pristimantis altamnis`$`Number of subpopulation`
## [1] 2
## 
## $`Pristimantis altamnis`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -78.37916, -75.93418, -2.082417, 0.5621935  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis apiculatus`
## $`Pristimantis apiculatus`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis apiculatus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.23471, -78.3364, -0.6949786, 0.2094079  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis appendiculatus`
## $`Pristimantis appendiculatus`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis appendiculatus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.59916, -78.22913, -0.9084211, 0.4515893  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis atratus`
## $`Pristimantis atratus`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis atratus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -78.99916, -78.05084, -3.702997, -2.580615  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis aureolineatus`
## $`Pristimantis aureolineatus`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis aureolineatus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -77.41582, -76.16751, -0.8522122, 0.502191  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis balionotus`
## $`Pristimantis balionotus`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis balionotus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.55638, -78.65806, -4.426704, -3.520204  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis baryecuus`
## $`Pristimantis baryecuus`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis baryecuus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.08249, -78.01754, -3.719672, -2.280722  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis bicantus`
## $`Pristimantis bicantus`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis bicantus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -78.29963, -77.40131, -0.7100716, 0.1943159  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis bromeliaceus`
## $`Pristimantis bromeliaceus`$`Number of subpopulation`
## [1] 2
## 
## $`Pristimantis bromeliaceus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.52416, -77.78384, -4.420034, -2.280725  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis buckleyi`
## $`Pristimantis buckleyi`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis buckleyi`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.21586, -77.06918, -1.118906, 1.252256  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis cajamarcensis`
## $`Pristimantis cajamarcensis`$`Number of subpopulation`
## [1] 2
## 
## $`Pristimantis cajamarcensis`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -80.0536, -78.69168, -5.123715, -2.232687  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis calcaratus`
## $`Pristimantis calcaratus`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis calcaratus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.31694, -77.5619, -0.9008274, 1.262728  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis calcarulatus`
## $`Pristimantis calcarulatus`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis calcarulatus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.29749, -78.25384, -0.9092212, 0.4355218  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis caprifer`
## $`Pristimantis caprifer`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis caprifer`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.46833, -78.0139, -1.34671, 0.187984  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis carvalhoi`
## $`Pristimantis carvalhoi`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis carvalhoi`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -77.78246, -76.88414, -1.952386, -1.047705  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis celator`
## $`Pristimantis celator`$`Number of subpopulation`
## [1] 3
## 
## $`Pristimantis celator`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.79916, -77.5619, -3.019709, 1.262728  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis chalceus`
## $`Pristimantis chalceus`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis chalceus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -80.44305, -77.65084, -1.34671, 1.485592  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis chloronotus`
## $`Pristimantis chloronotus`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis chloronotus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -78.78249, -77.04112, -1.618983, 1.102237  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis citriogaster`
## $`Pristimantis citriogaster`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis citriogaster`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -78.31511, -77.41244, -1.405299, -0.5003487  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis colodactylus`
## $`Pristimantis colodactylus`$`Number of subpopulation`
## [1] 2
## 
## $`Pristimantis colodactylus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.5611, -78.05084, -4.426704, -2.297387  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis colomai`
## $`Pristimantis colomai`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis colomai`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.03269, -78.13437, 0.4600926, 1.364583  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis condor`
## $`Pristimantis condor`$`Number of subpopulation`
## [1] 2
## 
## $`Pristimantis condor`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -78.99916, -77.78384, -3.93611, -1.772126  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis conspicillatus`
## $`Pristimantis conspicillatus`$`Number of subpopulation`
## [1] 3
## 
## $`Pristimantis conspicillatus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -80.53246, -75.23418, -4.320011, 1.532208  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis cremnobates`
## $`Pristimantis cremnobates`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis cremnobates`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -78.1811, -77.13414, -0.6708101, 0.3521869  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis crenunguis`
## $`Pristimantis crenunguis`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis crenunguis`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.59916, -78.21754, -0.8887183, 0.7855399  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis croceoinguinis`
## $`Pristimantis croceoinguinis`$`Number of subpopulation`
## [1] 2
## 
## $`Pristimantis croceoinguinis`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -78.53249, -75.74084, -3.169467, 1.0689  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis crucifer`
## $`Pristimantis crucifer`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis crucifer`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.44696, -78.00812, -0.885515, 0.8145641  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis cryophilius`
## $`Pristimantis cryophilius`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis cryophilius`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.67583, -78.02084, -3.486229, -1.830863  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis cryptomelas`
## $`Pristimantis cryptomelas`$`Number of subpopulation`
## [1] 2
## 
## $`Pristimantis cryptomelas`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.71832, -78.05084, -4.414753, -2.580615  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis curtipes`
## $`Pristimantis curtipes`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis curtipes`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.69916, -77.21504, -3.702997, 1.252256  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis delius`
## $`Pristimantis delius`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis delius`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -78.19916, -76.51751, -2.035738, 0.502191  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis devillei`
## $`Pristimantis devillei`$`Number of subpopulation`
## [1] 2
## 
## $`Pristimantis devillei`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -78.88249, -77.13414, -1.902374, 1.0689  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis diadematus`
## $`Pristimantis diadematus`$`Number of subpopulation`
## [1] 2
## 
## $`Pristimantis diadematus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -78.81916, -75.60084, -3.22656, 0.5368924  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis dissimulatus`
## $`Pristimantis dissimulatus`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis dissimulatus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.19694, -78.27695, -0.9008274, 0.2069079  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis duellmani`
## $`Pristimantis duellmani`$`Number of subpopulation`
## [1] 2
## 
## $`Pristimantis duellmani`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.29694, -77.50723, -0.8814177, 1.36894  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis eremitus`
## $`Pristimantis eremitus`$`Number of subpopulation`
## [1] 2
## 
## $`Pristimantis eremitus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.63246, -78.22994, -2.952685, 0.5453367  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis eriphus`
## $`Pristimantis eriphus`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis eriphus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -78.4986, -77.01183, -1.178449, 0.1969639  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis ernesti`
## $`Pristimantis ernesti`$`Number of subpopulation`
## [1] 2
## 
## $`Pristimantis ernesti`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.07916, -77.17084, -1.032229, -0.1278057  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis eugeniae`
## $`Pristimantis eugeniae`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis eugeniae`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.17527, -78.25384, -0.6974788, 0.4269886  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis fenestratus`
## $`Pristimantis fenestratus`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis fenestratus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -78.04916, -77.15084, -1.522299, -0.6177664  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis festae`
## $`Pristimantis festae`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis festae`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -78.78249, -77.43084, -1.618983, 0.5688608  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis floridus`
## $`Pristimantis floridus`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis floridus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.69916, -78.01754, -1.152243, 1.285561  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis frater`
## $`Pristimantis frater`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis frater`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.55166, -78.65334, -0.7202582, 0.18413  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis galdi`
## $`Pristimantis galdi`$`Number of subpopulation`
## [1] 2
## 
## $`Pristimantis galdi`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -78.96586, -76.86751, -3.93611, 0.3355197  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis ganonotus`
## $`Pristimantis ganonotus`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis ganonotus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -78.66527, -77.63418, -3.20278, -1.621369  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis gentryi`
## $`Pristimantis gentryi`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis gentryi`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.41582, -78.40084, -1.435617, -0.4811136  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis gladiator`
## $`Pristimantis gladiator`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis gladiator`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -78.54332, -77.30112, -0.8747141, 0.191353  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis glandulosus`
## $`Pristimantis glandulosus`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis glandulosus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -78.55138, -77.38414, -1.035563, 0.08940913  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis hamiotae`
## $`Pristimantis hamiotae`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis hamiotae`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.11079, -78.15084, -0.4580895, 0.4521893  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis hectus`
## $`Pristimantis hectus`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis hectus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.13249, -78.23418, -0.4688568, 0.4355218  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis ignicolor`
## $`Pristimantis ignicolor`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis ignicolor`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -78.51749, -77.60779, -0.8391551, 0.07607639  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis illotus`
## $`Pristimantis illotus`$`Number of subpopulation`
## [1] 2
## 
## $`Pristimantis illotus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.81586, -77.61614, -1.002226, 1.316155  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis incanus`
## $`Pristimantis incanus`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis incanus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -78.44916, -77.16751, -0.8522122, 0.3355197  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis incomptus`
## $`Pristimantis incomptus`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis incomptus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -78.32025, -77.15084, -0.939824, 0.5355253  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis inusitatus`
## $`Pristimantis inusitatus`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis inusitatus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -78.32981, -77.42001, -1.023339, 0.5172996  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis katoptroides`
## $`Pristimantis katoptroides`$`Number of subpopulation`
## [1] 2
## 
## $`Pristimantis katoptroides`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.25388, -77.55305, -4.909871, -1.034419  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis kichwarum`
## $`Pristimantis kichwarum`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis kichwarum`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -78.36916, -75.92084, -1.552304, 0.502191  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis kirklandi`
## $`Pristimantis kirklandi`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis kirklandi`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -78.44916, -77.55084, -0.8522122, 0.05218791  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis labiosus`
## $`Pristimantis labiosus`$`Number of subpopulation`
## [1] 2
## 
## $`Pristimantis labiosus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -80.21836, -78.21754, -4.114031, 0.8355438  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis lacrimosus`
## $`Pristimantis lacrimosus`$`Number of subpopulation`
## [1] 2
## 
## $`Pristimantis lacrimosus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -78.59916, -75.93084, -2.935978, 0.5368924  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis lanthanites`
## $`Pristimantis lanthanites`$`Number of subpopulation`
## [1] 4
## 
## $`Pristimantis lanthanites`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -80.53246, -75.83109, -4.522593, 0.5368924  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis laticlavius`
## $`Pristimantis laticlavius`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis laticlavius`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.29636, -78.39804, -0.7088685, 0.1955189  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis latidiscus`
## $`Pristimantis latidiscus`$`Number of subpopulation`
## [1] 2
## 
## $`Pristimantis latidiscus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -80.15249, -76.55084, -2.369194, 0.8080416  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis latro`
## $`Pristimantis latro`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis latro`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -77.41582, -76.43364, -0.402188, 0.5368924  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis leoni`
## $`Pristimantis leoni`$`Number of subpopulation`
## [1] 2
## 
## $`Pristimantis leoni`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.29694, -77.05084, -0.7174801, 1.318933  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis leucopus`
## $`Pristimantis leucopus`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis leucopus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -78.03249, -77.06751, 0.1311386, 1.09807  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis librarius`
## $`Pristimantis librarius`$`Number of subpopulation`
## [1] 2
## 
## $`Pristimantis librarius`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -78.36916, -76.16751, -2.992699, 0.5621935  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis lividus`
## $`Pristimantis lividus`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis lividus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -78.52666, -77.55334, -0.8747141, 0.08524321  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis loustes`
## $`Pristimantis loustes`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis loustes`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -78.54916, -77.65084, 0.4477837, 1.352271  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis luscombei`
## $`Pristimantis luscombei`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis luscombei`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -77.92916, -77.03084, -3.252801, -2.34737  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis luteolateralis`
## $`Pristimantis luteolateralis`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis luteolateralis`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.81582, -78.31612, -1.002226, 0.4177443  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis lymani`
## $`Pristimantis lymani`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis lymani`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -80.54916, -78.68414, -5.103785, -2.807476  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis malkini`
## $`Pristimantis malkini`$`Number of subpopulation`
## [1] 2
## 
## $`Pristimantis malkini`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -78.06916, -75.93084, -2.835973, -0.01447724  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis martiae`
## $`Pristimantis martiae`$`Number of subpopulation`
## [1] 3
## 
## $`Pristimantis martiae`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -78.58246, -75.72084, -2.936008, 0.5621935  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis matidiktyo`
## $`Pristimantis matidiktyo`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis matidiktyo`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -78.06916, -76.90084, -2.262464, -0.6177664  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis miktos`
## $`Pristimantis miktos`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis miktos`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -76.63916, -75.74084, -2.562552, -1.657576  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis modipeplus`
## $`Pristimantis modipeplus`$`Number of subpopulation`
## [1] 2
## 
## $`Pristimantis modipeplus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.18249, -77.96751, -1.969057, 0.4901906  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis muricatus`
## $`Pristimantis muricatus`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis muricatus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.81586, -78.39694, -1.082339, 0.2021859  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis nigrogriseus`
## $`Pristimantis nigrogriseus`$`Number of subpopulation`
## [1] 3
## 
## $`Pristimantis nigrogriseus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.08249, -77.21751, -3.506326, 0.5355253  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis nimbus`
## $`Pristimantis nimbus`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis nimbus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.03345, -78.06042, -3.482676, -2.547379  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis nyctophylax`
## $`Pristimantis nyctophylax`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis nyctophylax`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.46833, -78.30894, -0.9084211, 0.4199664  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis ocellatus`
## $`Pristimantis ocellatus`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis ocellatus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -78.68246, -77.78414, 0.5810704, 1.485592  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis ockendeni`
## $`Pristimantis ockendeni`$`Number of subpopulation`
## [1] 3
## 
## $`Pristimantis ockendeni`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.08216, -75.28286, -4.736553, 0.5158015  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis ocreatus`
## $`Pristimantis ocreatus`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis ocreatus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -78.39916, -77.46751, 0.3469591, 1.252256  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis orcesi`
## $`Pristimantis orcesi`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis orcesi`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.61582, -77.98418, -2.252461, 0.01885576  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis orestes`
## $`Pristimantis orestes`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis orestes`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.71832, -78.12594, -4.140437, -2.364664  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis ornatissimus`
## $`Pristimantis ornatissimus`$`Number of subpopulation`
## [1] 3
## 
## $`Pristimantis ornatissimus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.84056, -78.11764, -2.952685, 1.370804  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis orphnolaimus`
## $`Pristimantis orphnolaimus`$`Number of subpopulation`
## [1] 2
## 
## $`Pristimantis orphnolaimus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.81586, -76.43364, -1.522299, 0.6855  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis parvillus`
## $`Pristimantis parvillus`$`Number of subpopulation`
## [1] 2
## 
## $`Pristimantis parvillus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.84056, -78.34973, -1.082339, 1.20225  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis pastazensis`
## $`Pristimantis pastazensis`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis pastazensis`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -78.86582, -77.85084, -1.852363, -0.9310573  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis paululus`
## $`Pristimantis paululus`$`Number of subpopulation`
## [1] 3
## 
## $`Pristimantis paululus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -78.05135, -75.98414, -2.519209, 0.2021859  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis peruvianus`
## $`Pristimantis peruvianus`$`Number of subpopulation`
## [1] 3
## 
## $`Pristimantis peruvianus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -78.94916, -76.86751, -3.93611, 0.5355253  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis petersi`
## $`Pristimantis petersi`$`Number of subpopulation`
## [1] 2
## 
## $`Pristimantis petersi`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -78.86586, -77.05084, -1.919045, 0.9188851  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis philipi`
## $`Pristimantis philipi`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis philipi`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.60428, -78.70596, -3.293678, -2.388217  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis phoxocephalus`
## $`Pristimantis phoxocephalus`$`Number of subpopulation`
## [1] 2
## 
## $`Pristimantis phoxocephalus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -81.16616, -78.19112, -4.414753, 0.652198  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis prolatus`
## $`Pristimantis prolatus`$`Number of subpopulation`
## [1] 3
## 
## $`Pristimantis prolatus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -78.96586, -77.07943, -3.502906, 0.5355253  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis prometeii`
## $`Pristimantis prometeii`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis prometeii`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -80.20916, -79.31084, -4.103195, -3.197027  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis proserpens`
## $`Pristimantis proserpens`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis proserpens`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -78.99916, -77.78384, -3.93611, -2.56951  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis pseudoacuminatus`
## $`Pristimantis pseudoacuminatus`$`Number of subpopulation`
## [1] 2
## 
## $`Pristimantis pseudoacuminatus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -78.8874, -75.98414, -3.675154, 0.5368924  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis pteridophilus`
## $`Pristimantis pteridophilus`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis pteridophilus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.29694, -78.18113, -0.7174801, 0.7113727  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis pugnax`
## $`Pristimantis pugnax`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis pugnax`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -78.31806, -77.04112, -0.9363867, 1.102237  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis pycnodermis`
## $`Pristimantis pycnodermis`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis pycnodermis`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.16582, -78.01754, -3.719672, -2.277394  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis pyrrhomerus`
## $`Pristimantis pyrrhomerus`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis pyrrhomerus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.54266, -78.35084, -2.219122, 0.03548832  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis quaquaversus`
## $`Pristimantis quaquaversus`$`Number of subpopulation`
## [1] 3
## 
## $`Pristimantis quaquaversus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.32916, -75.82084, -3.93611, 0.5355253  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis quinquagesimus`
## $`Pristimantis quinquagesimus`$`Number of subpopulation`
## [1] 2
## 
## $`Pristimantis quinquagesimus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.41586, -77.65084, -0.9008274, 1.36894  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis riveti`
## $`Pristimantis riveti`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis riveti`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.66582, -78.01754, -4.414753, -1.897512  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis rosadoi`
## $`Pristimantis rosadoi`$`Number of subpopulation`
## [1] 2
## 
## $`Pristimantis rosadoi`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.59916, -78.47584, -0.7022011, 1.197805  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis rubicundus`
## $`Pristimantis rubicundus`$`Number of subpopulation`
## [1] 2
## 
## $`Pristimantis rubicundus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -78.61582, -77.21751, -1.993406, 0.5355253  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis scolodiscus`
## $`Pristimantis scolodiscus`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis scolodiscus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -78.68246, -77.65084, 0.4477837, 1.485592  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis simonbolivari`
## $`Pristimantis simonbolivari`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis simonbolivari`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.38249, -78.43418, -2.202448, -1.247668  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis skydmainos`
## $`Pristimantis skydmainos`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis skydmainos`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -77.41582, -76.51751, -0.9188851, -0.01447724  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis sobetes`
## $`Pristimantis sobetes`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis sobetes`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.41586, -78.27695, -0.885515, 0.2069079  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis spinosus`
## $`Pristimantis spinosus`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis spinosus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -78.99916, -78.01754, -3.719672, -2.297387  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis subsigillatus`
## $`Pristimantis subsigillatus`$`Number of subpopulation`
## [1] 4
## 
## $`Pristimantis subsigillatus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.92332, -78.32364, -3.153872, 1.582009  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis supernatis`
## $`Pristimantis supernatis`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis supernatis`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -78.13146, -77.0489, 0.1311386, 1.168695  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis surdus`
## $`Pristimantis surdus`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis surdus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.46586, -78.03414, -1.869037, 0.4521893  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis tenebrionis`
## $`Pristimantis tenebrionis`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis tenebrionis`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.81586, -78.61118, -1.082339, 0.2021859  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis thymalopsoides`
## $`Pristimantis thymalopsoides`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis thymalopsoides`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.43249, -78.35084, -1.385609, 0.03548832  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis thymelensis`
## $`Pristimantis thymelensis`$`Number of subpopulation`
## [1] 2
## 
## $`Pristimantis thymelensis`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -78.63944, -77.38168, -0.8210986, 1.251423  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis trachyblepharis`
## $`Pristimantis trachyblepharis`$`Number of subpopulation`
## [1] 4
## 
## $`Pristimantis trachyblepharis`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.08216, -76.51751, -4.736553, 0.502191  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis trepidotus`
## $`Pristimantis trepidotus`$`Number of subpopulation`
## [1] 2
## 
## $`Pristimantis trepidotus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -78.93246, -77.55084, -1.83569, 0.08246526  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis truebae`
## $`Pristimantis truebae`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis truebae`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.46582, -78.41751, -2.869322, -0.497779  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis unistrigatus`
## $`Pristimantis unistrigatus`$`Number of subpopulation`
## [1] 3
## 
## $`Pristimantis unistrigatus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.74916, -76.79381, -3.269507, 1.252256  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis variabilis`
## $`Pristimantis variabilis`$`Number of subpopulation`
## [1] 2
## 
## $`Pristimantis variabilis`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -78.61586, -75.98414, -2.919342, 0.5158015  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis ventrimarmoratus`
## $`Pristimantis ventrimarmoratus`$`Number of subpopulation`
## [1] 3
## 
## $`Pristimantis ventrimarmoratus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -78.86586, -76.51751, -3.41957, 0.5355253  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis verecundus`
## $`Pristimantis verecundus`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis verecundus`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.24644, -77.78414, -0.1387434, 1.485592  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis versicolor`
## $`Pristimantis versicolor`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis versicolor`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.74916, -78.05084, -4.43671, -2.180758  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis vertebralis`
## $`Pristimantis vertebralis`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis vertebralis`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.48246, -78.23854, -2.202448, 0.9029166  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis vidua`
## $`Pristimantis vidua`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis vidua`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.71249, -78.66279, -4.414753, -2.264065  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis w-nigrum`
## $`Pristimantis w-nigrum`$`Number of subpopulation`
## [1] 2
## 
## $`Pristimantis w-nigrum`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -80.41586, -76.88414, -4.414197, 1.485592  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis walkeri`
## $`Pristimantis walkeri`$`Number of subpopulation`
## [1] 3
## 
## $`Pristimantis walkeri`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -80.21836, -77.15084, -4.114031, 1.20225  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis waoranii`
## $`Pristimantis waoranii`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis waoranii`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -78.43246, -77.53414, -1.919048, -1.014381  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
## 
## 
## $`Pristimantis yantzaza`
## $`Pristimantis yantzaza`$`Number of subpopulation`
## [1] 1
## 
## $`Pristimantis yantzaza`$subpop.poly
## class       : SpatialPolygons 
## features    : 1 
## extent      : -79.34916, -78.45084, -5.063759, -4.156523  (xmin, xmax, ymin, ymax)
## coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0
sp::plot(SUB[["Pristimantis lanthanites"]][["subpop.poly"]], col="purple")
sp::plot(ne_countries(country='ecuador'), border="black", add=TRUE)

equ_gbif
## # A tibble: 87,271 x 45
##    gbifID datasetKey occurrenceID kingdom phylum class order family genus
##  *  <int> <chr>      <chr>        <chr>   <chr>  <chr> <chr> <chr>  <chr>
##  1 1.99e9 ad43e954-~ MH306193     Animal~ Chord~ Amph~ Anura Strab~ Pris~
##  2 1.99e9 ad43e954-~ MH306194     Animal~ Chord~ Amph~ Anura Strab~ Pris~
##  3 1.99e9 50c9509d-~ https://www~ Animal~ Chord~ Amph~ Anura Phyll~ Call~
##  4 1.99e9 50c9509d-~ https://www~ Animal~ Chord~ Amph~ Anura Strab~ Pris~
##  5 1.99e9 50c9509d-~ https://www~ Animal~ Chord~ Amph~ Anura Lepto~ Lept~
##  6 1.99e9 50c9509d-~ https://www~ Animal~ Chord~ Amph~ Anura Hylid~ Tepu~
##  7 1.99e9 50c9509d-~ https://www~ Animal~ Chord~ Amph~ Anura Strab~ Pris~
##  8 1.99e9 50c9509d-~ https://www~ Animal~ Chord~ Amph~ Anura Hylid~ Oste~
##  9 1.99e9 50c9509d-~ https://www~ Animal~ Chord~ Amph~ Anura Dendr~ Amee~
## 10 1.99e9 50c9509d-~ https://www~ Animal~ Chord~ Amph~ Anura Strab~ Pris~
## # ... with 87,261 more rows, and 36 more variables: species <chr>,
## #   infraspecificEpithet <chr>, taxonRank <chr>, scientificName <chr>,
## #   countryCode <chr>, locality <chr>, publishingOrgKey <chr>,
## #   decimalLatitude <dbl>, decimalLongitude <dbl>,
## #   coordinateUncertaintyInMeters <dbl>, coordinatePrecision <lgl>,
## #   elevation <dbl>, elevationAccuracy <dbl>, depth <dbl>,
## #   depthAccuracy <dbl>, eventDate <chr>, day <int>, month <int>,
## #   year <int>, taxonKey <int>, speciesKey <int>, basisOfRecord <chr>,
## #   institutionCode <chr>, collectionCode <chr>, catalogNumber <chr>,
## #   recordNumber <chr>, identifiedBy <chr>, dateIdentified <chr>,
## #   license <chr>, rightsHolder <chr>, recordedBy <chr>, typeStatus <chr>,
## #   establishmentMeans <chr>, lastInterpreted <chr>, mediaType <chr>,
## #   issue <chr>
tmp <- equ_gbif %>% dplyr::filter(genus == "Pristimantis") %>%
  select(decimalLatitude, decimalLongitude, species, genus)

tmp
## # A tibble: 20,781 x 4
##    decimalLatitude decimalLongitude species                     genus      
##              <dbl>            <dbl> <chr>                       <chr>      
##  1         -0.03              -78.7 <NA>                        Pristimant~
##  2         -0.03              -78.7 <NA>                        Pristimant~
##  3          0.0530            -78.8 Pristimantis achatinus      Pristimant~
##  4         -0.0156            -78.7 Pristimantis appendiculatus Pristimant~
##  5         -4.60              -78.8 <NA>                        Pristimant~
##  6         -2.07              -78.2 Pristimantis ganonotus      Pristimant~
##  7         -1.10              -76.7 Pristimantis diadematus     Pristimant~
##  8         -4.46              -78.8 Pristimantis katoptroides   Pristimant~
##  9         -0.231             -78.4 Pristimantis unistrigatus   Pristimant~
## 10         -0.728             -77.7 Pristimantis galdi          Pristimant~
## # ... with 20,771 more rows
nPristimantis <- tmp %>%
  filter(!is.na(decimalLatitude)) %>%
  filter(!is.na(species))

nPristimantis
## # A tibble: 16,872 x 4
##    decimalLatitude decimalLongitude species                     genus      
##              <dbl>            <dbl> <chr>                       <chr>      
##  1          0.0530            -78.8 Pristimantis achatinus      Pristimant~
##  2         -0.0156            -78.7 Pristimantis appendiculatus Pristimant~
##  3         -2.07              -78.2 Pristimantis ganonotus      Pristimant~
##  4         -1.10              -76.7 Pristimantis diadematus     Pristimant~
##  5         -4.46              -78.8 Pristimantis katoptroides   Pristimant~
##  6         -0.231             -78.4 Pristimantis unistrigatus   Pristimant~
##  7         -0.728             -77.7 Pristimantis galdi          Pristimant~
##  8          0.0931            -78.7 Pristimantis eremitus       Pristimant~
##  9         -0.0205            -78.5 Pristimantis crucifer       Pristimant~
## 10          0.120             -79.0 Pristimantis achatinus      Pristimant~
## # ... with 16,862 more rows
library(ConR)
MyResults <- IUCN.eval(Pristimantis, Cell_size_AOO = 100)
## [1] "Skipping 3616 occurrences because of missing coordinates for Pristimantis vertebralis AND Pristimantis lanthanites AND Pristimantis peruvianus AND Pristimantis altamazonicus AND Pristimantis variabilis AND Pristimantis unistrigatus AND Pristimantis achatinus AND Pristimantis croceoinguinis AND Pristimantis actites AND Pristimantis calcarulatus AND Pristimantis chloronotus AND Pristimantis duellmani AND Pristimantis celator AND Pristimantis caprifer AND Pristimantis yantzaza AND Pristimantis curtipes AND Pristimantis w-nigrum AND Pristimantis conspicillatus AND NA AND Pristimantis walkeri AND Pristimantis rosadoi AND Pristimantis eremitus AND Pristimantis ornatissimus AND Pristimantis lymani AND Pristimantis glandulosus AND Pristimantis devillei AND Pristimantis librarius AND Pristimantis lacrimosus AND Pristimantis malkini AND Pristimantis surdus AND Pristimantis ockendeni AND Pristimantis quaquaversus AND Pristimantis acuminatus AND Pristimantis petersi AND Pristimantis ventrimarmoratus AND Pristimantis waoranii AND Pristimantis galdi AND Pristimantis floridus AND Pristimantis labiosus AND Pristimantis leoni AND Pristimantis orcesi AND Pristimantis crenunguis AND Pristimantis chalceus AND Pristimantis versicolor AND Pristimantis pugnax AND Pristimantis latidiscus AND Pristimantis martiae AND Pristimantis cryophilius AND Pristimantis riveti AND Pristimantis nyctophylax AND Pristimantis festae AND Pristimantis crucifer AND Pristimantis buckleyi AND Pristimantis subsigillatus AND Pristimantis trachyblepharis AND Pristimantis bisignatus AND Pristimantis thymelensis AND Pristimantis ocreatus AND Pristimantis supernatis AND Pristimantis prolatus AND Pristimantis altamnis AND Pristimantis vidua AND Pristimantis truebae AND Pristimantis spinosus AND Pristimantis cajamarcensis AND Pristimantis percultus AND Pristimantis colodactylus AND Pristimantis proserpens AND Pristimantis nigrogriseus AND Pristimantis leucopus AND Pristimantis balionotus AND Pristimantis incomptus AND Pristimantis phoxocephalus AND Pristimantis calcaratus AND Pristimantis quinquagesimus AND Pristimantis tenebrionis AND Pristimantis pteridophilus AND Pristimantis rubicundus AND Pristimantis kichwarum AND Pristimantis pycnodermis AND Pristimantis atratus AND Pristimantis inusitatus AND Pristimantis eriphus AND Pristimantis ignicolor AND Pristimantis orestes AND Pristimantis exoristus AND Pristimantis pecki AND Pristimantis cryptomelas AND Pristimantis condor AND Pristimantis bromeliaceus AND Pristimantis acerus AND Pristimantis gladiator AND Pristimantis modipeplus AND Pristimantis diadematus AND Pristimantis aureolineatus AND Pristimantis metabates AND Pristimantis luteolateralis AND Pristimantis paululus AND Pristimantis ernesti AND Pristimantis ruidus AND Pristimantis parvillus AND Pristimantis muricatus AND Pristimantis delius AND Pristimantis cremnobates AND Pristimantis appendiculatus AND Pristimantis achuar AND Pristimantis ganonotus AND Pristimantis pseudoacuminatus"
## 
  |                                                                       
  |                                                                 |   0%
## 
  |                                                                       
  |                                                                 |   1%
## 
  |                                                                       
  |=                                                                |   1%
## 
  |                                                                       
  |=                                                                |   2%
## 
  |                                                                       
  |==                                                               |   3%
## 
  |                                                                       
  |==                                                               |   4%
## 
  |                                                                       
  |===                                                              |   4%
## 
  |                                                                       
  |===                                                              |   5%
## Warning in .IUCN.comp(x, NamesSp = as.character(unique(x$tax)), DrawMap
## = DrawMap, : EOO statistic is not computed for Pristimantis apiculatus
## because there is less than 3 records
## 
  |                                                                       
  |====                                                             |   6%
## 
  |                                                                       
  |=====                                                            |   7%
## Warning in .IUCN.comp(x, NamesSp = as.character(unique(x$tax)), DrawMap
## = DrawMap, : EOO statistic is not computed for Pristimantis aureolineatus
## because there is less than 3 records
## 
  |                                                                       
  |=====                                                            |   8%
## Warning in .IUCN.comp(x, NamesSp = as.character(unique(x$tax)), DrawMap
## = DrawMap, : EOO statistic is not computed for Pristimantis balionotus
## because there is less than 3 records
## 
  |                                                                       
  |======                                                           |   9%
## Warning in .IUCN.comp(x, NamesSp = as.character(unique(x$tax)), DrawMap =
## DrawMap, : EOO statistic is not computed for Pristimantis bicantus because
## there is less than 3 records
## 
  |                                                                       
  |=======                                                          |  10%
## 
  |                                                                       
  |=======                                                          |  11%
## 
  |                                                                       
  |=======                                                          |  12%
## 
  |                                                                       
  |========                                                         |  12%
## 
  |                                                                       
  |========                                                         |  13%
## 
  |                                                                       
  |=========                                                        |  14%
## Warning in .IUCN.comp(x, NamesSp = as.character(unique(x$tax)), DrawMap =
## DrawMap, : EOO statistic is not computed for Pristimantis carvalhoi because
## there is less than 3 records
## 
  |                                                                       
  |==========                                                       |  15%
## 
  |                                                                       
  |==========                                                       |  16%
## 
  |                                                                       
  |===========                                                      |  17%
## Warning in .IUCN.comp(x, NamesSp = as.character(unique(x$tax)), DrawMap
## = DrawMap, : EOO statistic is not computed for Pristimantis citriogaster
## because there is less than 3 records
## 
  |                                                                       
  |============                                                     |  18%
## 
  |                                                                       
  |============                                                     |  19%
## Warning in .IUCN.comp(x, NamesSp = as.character(unique(x$tax)), DrawMap =
## DrawMap, : EOO statistic is not computed for Pristimantis colomai because
## there is less than 3 records
## 
  |                                                                       
  |=============                                                    |  19%
## 
  |                                                                       
  |=============                                                    |  20%
## 
  |                                                                       
  |==============                                                   |  21%
## 
  |                                                                       
  |==============                                                   |  22%
## 
  |                                                                       
  |===============                                                  |  23%
## 
  |                                                                       
  |===============                                                  |  24%
## 
  |                                                                       
  |================                                                 |  24%
## 
  |                                                                       
  |================                                                 |  25%
## 
  |                                                                       
  |=================                                                |  26%
## 
  |                                                                       
  |=================                                                |  27%
## 
  |                                                                       
  |==================                                               |  27%
## 
  |                                                                       
  |==================                                               |  28%
## Warning in .IUCN.comp(x, NamesSp = as.character(unique(x$tax)), DrawMap
## = DrawMap, : EOO statistic is not computed for Pristimantis dissimulatus
## because there is less than 3 records
## 
  |                                                                       
  |===================                                              |  29%
## 
  |                                                                       
  |====================                                             |  30%
## 
  |                                                                       
  |====================                                             |  31%
## Warning in .IUCN.comp(x, NamesSp = as.character(unique(x$tax)), DrawMap =
## DrawMap, : EOO statistic is not computed for Pristimantis ernesti because
## there is less than 3 records
## 
  |                                                                       
  |=====================                                            |  32%
## Warning in .IUCN.comp(x, NamesSp = as.character(unique(x$tax)), DrawMap =
## DrawMap, : EOO statistic is not computed for Pristimantis eugeniae because
## there is less than 3 records
## Warning in .IUCN.comp(x, NamesSp = as.character(unique(x$tax)), DrawMap
## = DrawMap, : EOO statistic is not computed for Pristimantis fenestratus
## because there is less than 3 records
## 
  |                                                                       
  |======================                                           |  33%
## 
  |                                                                       
  |======================                                           |  34%
## 
  |                                                                       
  |======================                                           |  35%
## Warning in .IUCN.comp(x, NamesSp = as.character(unique(x$tax)), DrawMap =
## DrawMap, : EOO statistic is not computed for Pristimantis frater because
## there is less than 3 records
## 
  |                                                                       
  |=======================                                          |  35%
## 
  |                                                                       
  |=======================                                          |  36%
## Warning in .IUCN.comp(x, NamesSp = as.character(unique(x$tax)), DrawMap =
## DrawMap, : EOO statistic is not computed for Pristimantis ganonotus because
## there is less than 3 records
## 
  |                                                                       
  |========================                                         |  37%
## 
  |                                                                       
  |=========================                                        |  38%
## 
  |                                                                       
  |=========================                                        |  39%
## Warning in .IUCN.comp(x, NamesSp = as.character(unique(x$tax)), DrawMap =
## DrawMap, : EOO statistic is not computed for Pristimantis hamiotae because
## there is less than 3 records
## 
  |                                                                       
  |==========================                                       |  40%
## Warning in .IUCN.comp(x, NamesSp = as.character(unique(x$tax)), DrawMap =
## DrawMap, : EOO statistic is not computed for Pristimantis hectus because
## there is less than 3 records
## Warning in .IUCN.comp(x, NamesSp = as.character(unique(x$tax)), DrawMap =
## DrawMap, : EOO statistic is not computed for Pristimantis ignicolor because
## there is less than 3 records
## 
  |                                                                       
  |===========================                                      |  41%
## 
  |                                                                       
  |===========================                                      |  42%
## 
  |                                                                       
  |============================                                     |  42%
## 
  |                                                                       
  |============================                                     |  43%
## Warning in .IUCN.comp(x, NamesSp = as.character(unique(x$tax)), DrawMap
## = DrawMap, : EOO statistic is not computed for Pristimantis inusitatus
## because there is less than 3 records
## 
  |                                                                       
  |=============================                                    |  44%
## Warning in .IUCN.comp(x, NamesSp = as.character(unique(x$tax)), DrawMap
## = DrawMap, : EOO statistic is not computed for Pristimantis katoptroides
## because there is less than 3 records
## 
  |                                                                       
  |=============================                                    |  45%
## Warning in .IUCN.comp(x, NamesSp = as.character(unique(x$tax)), DrawMap =
## DrawMap, : EOO statistic is not computed for Pristimantis kirklandi because
## there is less than 3 records
## 
  |                                                                       
  |==============================                                   |  46%
## 
  |                                                                       
  |==============================                                   |  47%
## 
  |                                                                       
  |===============================                                  |  47%
## 
  |                                                                       
  |===============================                                  |  48%
## Warning in .IUCN.comp(x, NamesSp = as.character(unique(x$tax)), DrawMap
## = DrawMap, : EOO statistic is not computed for Pristimantis laticlavius
## because there is less than 3 records
## 
  |                                                                       
  |================================                                 |  49%
## 
  |                                                                       
  |================================                                 |  50%
## Warning in .IUCN.comp(x, NamesSp = as.character(unique(x$tax)), DrawMap
## = DrawMap, : EOO statistic is not computed for Pristimantis latro because
## there is less than 3 records
## 
  |                                                                       
  |=================================                                |  50%
## 
  |                                                                       
  |=================================                                |  51%
## 
  |                                                                       
  |==================================                               |  52%
## 
  |                                                                       
  |==================================                               |  53%
## 
  |                                                                       
  |===================================                              |  53%
## Warning in .IUCN.comp(x, NamesSp = as.character(unique(x$tax)), DrawMap =
## DrawMap, : EOO statistic is not computed for Pristimantis loustes because
## there is less than 3 records
## 
  |                                                                       
  |===================================                              |  54%
## Warning in .IUCN.comp(x, NamesSp = as.character(unique(x$tax)), DrawMap =
## DrawMap, : EOO statistic is not computed for Pristimantis luscombei because
## there is less than 3 records
## 
  |                                                                       
  |====================================                             |  55%
## 
  |                                                                       
  |====================================                             |  56%
## 
  |                                                                       
  |=====================================                            |  57%
## 
  |                                                                       
  |=====================================                            |  58%
## Warning in .IUCN.comp(x, NamesSp = as.character(unique(x$tax)), DrawMap
## = DrawMap, : EOO statistic is not computed for Pristimantis matidiktyo
## because there is less than 3 records
## 
  |                                                                       
  |======================================                           |  58%
## Warning in .IUCN.comp(x, NamesSp = as.character(unique(x$tax)), DrawMap =
## DrawMap, : EOO statistic is not computed for Pristimantis miktos because
## there is less than 3 records
## 
  |                                                                       
  |======================================                           |  59%
## 
  |                                                                       
  |=======================================                          |  60%
## 
  |                                                                       
  |========================================                         |  61%
## Warning in .IUCN.comp(x, NamesSp = as.character(unique(x$tax)), DrawMap =
## DrawMap, : EOO statistic is not computed for Pristimantis nimbus because
## there is less than 3 records
## 
  |                                                                       
  |========================================                         |  62%
## 
  |                                                                       
  |=========================================                        |  63%
## Warning in .IUCN.comp(x, NamesSp = as.character(unique(x$tax)), DrawMap =
## DrawMap, : EOO statistic is not computed for Pristimantis ocellatus because
## there is less than 3 records
## 
  |                                                                       
  |==========================================                       |  64%
## Warning in .IUCN.comp(x, NamesSp = as.character(unique(x$tax)), DrawMap =
## DrawMap, : EOO statistic is not computed for Pristimantis ocreatus because
## there is less than 3 records
## 
  |                                                                       
  |==========================================                       |  65%
## 
  |                                                                       
  |===========================================                      |  65%
## 
  |                                                                       
  |===========================================                      |  66%
## 
  |                                                                       
  |===========================================                      |  67%
## 
  |                                                                       
  |============================================                     |  68%
## Warning in .IUCN.comp(x, NamesSp = as.character(unique(x$tax)), DrawMap
## = DrawMap, : EOO statistic is not computed for Pristimantis pastazensis
## because there is less than 3 records
## 
  |                                                                       
  |=============================================                    |  69%
## 
  |                                                                       
  |=============================================                    |  70%
## 
  |                                                                       
  |==============================================                   |  71%
## Warning in .IUCN.comp(x, NamesSp = as.character(unique(x$tax)), DrawMap =
## DrawMap, : EOO statistic is not computed for Pristimantis philipi because
## there is less than 3 records
## 
  |                                                                       
  |===============================================                  |  72%
## 
  |                                                                       
  |===============================================                  |  73%
## 
  |                                                                       
  |================================================                 |  73%
## Warning in .IUCN.comp(x, NamesSp = as.character(unique(x$tax)), DrawMap =
## DrawMap, : EOO statistic is not computed for Pristimantis prometeii because
## there is less than 3 records
## 
  |                                                                       
  |================================================                 |  74%
## 
  |                                                                       
  |=================================================                |  75%
## 
  |                                                                       
  |=================================================                |  76%
## 
  |                                                                       
  |==================================================               |  76%
## 
  |                                                                       
  |==================================================               |  77%
## 
  |                                                                       
  |===================================================              |  78%
## 
  |                                                                       
  |===================================================              |  79%
## 
  |                                                                       
  |====================================================             |  80%
## 
  |                                                                       
  |====================================================             |  81%
## Warning in .IUCN.comp(x, NamesSp = as.character(unique(x$tax)), DrawMap =
## DrawMap, : EOO statistic is not computed for Pristimantis rosadoi because
## there is less than 3 records
## 
  |                                                                       
  |=====================================================            |  81%
## 
  |                                                                       
  |=====================================================            |  82%
## Warning in .IUCN.comp(x, NamesSp = as.character(unique(x$tax)), DrawMap
## = DrawMap, : EOO statistic is not computed for Pristimantis scolodiscus
## because there is less than 3 records
## 
  |                                                                       
  |======================================================           |  83%
## Warning in .IUCN.comp(x, NamesSp = as.character(unique(x$tax)), DrawMap
## = DrawMap, : EOO statistic is not computed for Pristimantis simonbolivari
## because there is less than 3 records
## Warning in .IUCN.comp(x, NamesSp = as.character(unique(x$tax)), DrawMap
## = DrawMap, : EOO statistic is not computed for Pristimantis skydmainos
## because there is less than 3 records
## 
  |                                                                       
  |=======================================================          |  84%
## 
  |                                                                       
  |=======================================================          |  85%
## 
  |                                                                       
  |========================================================         |  86%
## 
  |                                                                       
  |=========================================================        |  87%
## 
  |                                                                       
  |=========================================================        |  88%
## 
  |                                                                       
  |==========================================================       |  88%
## 
  |                                                                       
  |==========================================================       |  89%
## 
  |                                                                       
  |==========================================================       |  90%
## 
  |                                                                       
  |===========================================================      |  91%
## 
  |                                                                       
  |============================================================     |  92%
## 
  |                                                                       
  |============================================================     |  93%
## 
  |                                                                       
  |=============================================================    |  94%
## 
  |                                                                       
  |==============================================================   |  95%
## 
  |                                                                       
  |==============================================================   |  96%
## 
  |                                                                       
  |===============================================================  |  96%
## 
  |                                                                       
  |===============================================================  |  97%
## 
  |                                                                       
  |================================================================ |  98%
## 
  |                                                                       
  |================================================================ |  99%
## Warning in .IUCN.comp(x, NamesSp = as.character(unique(x$tax)), DrawMap =
## DrawMap, : EOO statistic is not computed for Pristimantis waoranii because
## there is less than 3 records
## 
  |                                                                       
  |=================================================================|  99%
## Warning in .IUCN.comp(x, NamesSp = as.character(unique(x$tax)), DrawMap =
## DrawMap, : EOO statistic is not computed for Pristimantis yantzaza because
## there is less than 3 records
## 
  |                                                                       
  |=================================================================| 100%
## [1] "Number of species per category"
## 
## LC or NT       VU 
##      114       25 
## [1] "Ratio of species per category"
## 
## LC or NT       VU 
##       82       18

The IUCN Categories are:

LC: Least Concern NT: Near Threatened VU: Vulnerable EN: Endangered CR: Critically Endangered The NT category is assigned here for taxa with a number of location lower than 14 and higher than 10, with EOO higher or equal to 20,000 km2 and with AOO higher or equal to 2,000 km2

According to the output we got there are 114 near threatened species,and 25 vulnerable. As result of running the IUCN.eval function, a PNG map per specie is save in the IUCN_results_map directory. A sample of the output maps is presented here:

library(knitr)
library(shiny)
knitr::include_graphics("./IUCN__results_map/IUCN_Pristimantis_altamnis.png")

knitr::include_graphics("./IUCN__results_map/IUCN_Pristimantis_balionotus.png")

knitr::include_graphics("./IUCN__results_map/IUCN_Pristimantis_katoptroides.png")

knitr::include_graphics("./IUCN__results_map/IUCN_Pristimantis_lacrimosus.png")

knitr::include_graphics("./IUCN__results_map/IUCN_Pristimantis_altamazonicus.png")

knitr::include_graphics("./IUCN__results_map/IUCN_Pristimantis_waoranii.png")

library(crayon)
## 
## Attaching package: 'crayon'
## The following object is masked from 'package:ggplot2':
## 
##     %+%
cat(blue("map.res(Results, Occurrences, country_map=NULL, Resol=1, threshold=0, 
    LatMin=NULL, LatMax=NULL, LongMin=NULL, 
    LongMax=NULL, export_map=FALSE, file_name=NULL, export_data=FALSE"))
## map.res(Results, Occurrences, country_map=NULL, Resol=1, threshold=0, 
##     LatMin=NULL, LatMax=NULL, LongMin=NULL, 
##     LongMax=NULL, export_map=FALSE, file_name=NULL, export_data=FALSE
cat(blue("map.res(MyResults, Occurrences=nPristimantis, country_map=ecuador, export_map=TRUE, threshold=0,
    LatMin=-3,LatMax=3,LongMin=-78, LongMax=-68, Resol=0.1"))
## map.res(MyResults, Occurrences=nPristimantis, country_map=ecuador, export_map=TRUE, threshold=0,
##     LatMin=-3,LatMax=3,LongMin=-78, LongMax=-68, Resol=0.1
cat(red("Error in ConR::map.res(MyResults2, Occurrences = as_data_frame(nPristimantis), : Results and Occurrences input files have different number of species"))
## Error in ConR::map.res(MyResults2, Occurrences = as_data_frame(nPristimantis), : Results and Occurrences input files have different number of species
library(magrittr)
## 
## Attaching package: 'magrittr'
## The following object is masked from 'package:purrr':
## 
##     set_names
## The following object is masked from 'package:tidyr':
## 
##     extract
## The following object is masked from 'package:raster':
## 
##     extract
library(dplyr)
MyResults  %>%  count(taxa) %>% arrange(desc(taxa)) 
## # A tibble: 139 x 2
##    taxa                              n
##    <fct>                         <int>
##  1 Pristimantis yantzaza             1
##  2 Pristimantis waoranii             1
##  3 Pristimantis walkeri              1
##  4 Pristimantis w-nigrum             1
##  5 Pristimantis vidua                1
##  6 Pristimantis vertebralis          1
##  7 Pristimantis versicolor           1
##  8 Pristimantis verecundus           1
##  9 Pristimantis ventrimarmoratus     1
## 10 Pristimantis variabilis           1
## # ... with 129 more rows
nPristimantis %>%  count(species) %>% arrange(desc(species))
## # A tibble: 139 x 2
##    species                           n
##    <chr>                         <int>
##  1 Pristimantis yantzaza             4
##  2 Pristimantis waoranii             1
##  3 Pristimantis walkeri            388
##  4 Pristimantis w-nigrum          2166
##  5 Pristimantis vidua               14
##  6 Pristimantis vertebralis        118
##  7 Pristimantis versicolor         102
##  8 Pristimantis verecundus           4
##  9 Pristimantis ventrimarmoratus    54
## 10 Pristimantis variabilis         990
## # ... with 129 more rows
levels(MyResults$taxa)
##   [1] "Pristimantis acerus"           "Pristimantis achatinus"       
##   [3] "Pristimantis achuar"           "Pristimantis actites"         
##   [5] "Pristimantis acuminatus"       "Pristimantis altamazonicus"   
##   [7] "Pristimantis altamnis"         "Pristimantis apiculatus"      
##   [9] "Pristimantis appendiculatus"   "Pristimantis atratus"         
##  [11] "Pristimantis aureolineatus"    "Pristimantis balionotus"      
##  [13] "Pristimantis baryecuus"        "Pristimantis bicantus"        
##  [15] "Pristimantis bromeliaceus"     "Pristimantis buckleyi"        
##  [17] "Pristimantis cajamarcensis"    "Pristimantis calcaratus"      
##  [19] "Pristimantis calcarulatus"     "Pristimantis caprifer"        
##  [21] "Pristimantis carvalhoi"        "Pristimantis celator"         
##  [23] "Pristimantis chalceus"         "Pristimantis chloronotus"     
##  [25] "Pristimantis citriogaster"     "Pristimantis colodactylus"    
##  [27] "Pristimantis colomai"          "Pristimantis condor"          
##  [29] "Pristimantis conspicillatus"   "Pristimantis cremnobates"     
##  [31] "Pristimantis crenunguis"       "Pristimantis croceoinguinis"  
##  [33] "Pristimantis crucifer"         "Pristimantis cryophilius"     
##  [35] "Pristimantis cryptomelas"      "Pristimantis curtipes"        
##  [37] "Pristimantis delius"           "Pristimantis devillei"        
##  [39] "Pristimantis diadematus"       "Pristimantis dissimulatus"    
##  [41] "Pristimantis duellmani"        "Pristimantis eremitus"        
##  [43] "Pristimantis eriphus"          "Pristimantis ernesti"         
##  [45] "Pristimantis eugeniae"         "Pristimantis fenestratus"     
##  [47] "Pristimantis festae"           "Pristimantis floridus"        
##  [49] "Pristimantis frater"           "Pristimantis galdi"           
##  [51] "Pristimantis ganonotus"        "Pristimantis gentryi"         
##  [53] "Pristimantis gladiator"        "Pristimantis glandulosus"     
##  [55] "Pristimantis hamiotae"         "Pristimantis hectus"          
##  [57] "Pristimantis ignicolor"        "Pristimantis illotus"         
##  [59] "Pristimantis incanus"          "Pristimantis incomptus"       
##  [61] "Pristimantis inusitatus"       "Pristimantis katoptroides"    
##  [63] "Pristimantis kichwarum"        "Pristimantis kirklandi"       
##  [65] "Pristimantis labiosus"         "Pristimantis lacrimosus"      
##  [67] "Pristimantis lanthanites"      "Pristimantis laticlavius"     
##  [69] "Pristimantis latidiscus"       "Pristimantis latro"           
##  [71] "Pristimantis leoni"            "Pristimantis leucopus"        
##  [73] "Pristimantis librarius"        "Pristimantis lividus"         
##  [75] "Pristimantis loustes"          "Pristimantis luscombei"       
##  [77] "Pristimantis luteolateralis"   "Pristimantis lymani"          
##  [79] "Pristimantis malkini"          "Pristimantis martiae"         
##  [81] "Pristimantis matidiktyo"       "Pristimantis miktos"          
##  [83] "Pristimantis modipeplus"       "Pristimantis muricatus"       
##  [85] "Pristimantis nigrogriseus"     "Pristimantis nimbus"          
##  [87] "Pristimantis nyctophylax"      "Pristimantis ocellatus"       
##  [89] "Pristimantis ockendeni"        "Pristimantis ocreatus"        
##  [91] "Pristimantis orcesi"           "Pristimantis orestes"         
##  [93] "Pristimantis ornatissimus"     "Pristimantis orphnolaimus"    
##  [95] "Pristimantis parvillus"        "Pristimantis pastazensis"     
##  [97] "Pristimantis paululus"         "Pristimantis peruvianus"      
##  [99] "Pristimantis petersi"          "Pristimantis philipi"         
## [101] "Pristimantis phoxocephalus"    "Pristimantis prolatus"        
## [103] "Pristimantis prometeii"        "Pristimantis proserpens"      
## [105] "Pristimantis pseudoacuminatus" "Pristimantis pteridophilus"   
## [107] "Pristimantis pugnax"           "Pristimantis pycnodermis"     
## [109] "Pristimantis pyrrhomerus"      "Pristimantis quaquaversus"    
## [111] "Pristimantis quinquagesimus"   "Pristimantis riveti"          
## [113] "Pristimantis rosadoi"          "Pristimantis rubicundus"      
## [115] "Pristimantis scolodiscus"      "Pristimantis simonbolivari"   
## [117] "Pristimantis skydmainos"       "Pristimantis sobetes"         
## [119] "Pristimantis spinosus"         "Pristimantis subsigillatus"   
## [121] "Pristimantis supernatis"       "Pristimantis surdus"          
## [123] "Pristimantis tenebrionis"      "Pristimantis thymalopsoides"  
## [125] "Pristimantis thymelensis"      "Pristimantis trachyblepharis" 
## [127] "Pristimantis trepidotus"       "Pristimantis truebae"         
## [129] "Pristimantis unistrigatus"     "Pristimantis variabilis"      
## [131] "Pristimantis ventrimarmoratus" "Pristimantis verecundus"      
## [133] "Pristimantis versicolor"       "Pristimantis vertebralis"     
## [135] "Pristimantis vidua"            "Pristimantis w-nigrum"        
## [137] "Pristimantis walkeri"          "Pristimantis waoranii"        
## [139] "Pristimantis yantzaza"
MyResults2 <- MyResults %>%
              mutate(taxa = as.character(taxa))
MyResults2 %>%  count(taxa) %>% arrange(desc(taxa))
## # A tibble: 139 x 2
##    taxa                              n
##    <chr>                         <int>
##  1 Pristimantis yantzaza             1
##  2 Pristimantis waoranii             1
##  3 Pristimantis walkeri              1
##  4 Pristimantis w-nigrum             1
##  5 Pristimantis vidua                1
##  6 Pristimantis vertebralis          1
##  7 Pristimantis versicolor           1
##  8 Pristimantis verecundus           1
##  9 Pristimantis ventrimarmoratus     1
## 10 Pristimantis variabilis           1
## # ... with 129 more rows
cat(blue("map.res(MyResults2, Occurrences=as_data_frame(nphyllomedusa), country_map=ecuador, export_map=TRUE, threshold=0,
    LatMin=-3,LatMax=3,LongMin=-78, LongMax=-68, Resol=0.1"))
## map.res(MyResults2, Occurrences=as_data_frame(nphyllomedusa), country_map=ecuador, export_map=TRUE, threshold=0,
##     LatMin=-3,LatMax=3,LongMin=-78, LongMax=-68, Resol=0.1

Dauby, G. et al. 2017. ConR: An R package to assist large-scale multispecies preliminary conservation assessments using distribution data. Ecology and Evolution 7(24): 11292-11303. IUCN. 2012. IUCN Red List Categories and Criteria: Version 3.1. Second edition. Gland, Switzerland and Cambridge, UK: IUCN. http://www.iucnredlist.org/technical-documents/categories-and-criteria IUCN Standards and Petitions Subcommittee. 2016. Guidelines for Using the IUCN Red List Categories and Criteria. Version 12. Prepared by the Standards and Petitions Subcommittee. http://www.iucnredlist.org/documents/RedListGuidelines.pdf Lovelace, R., Nowosad, J. & MuenchowG, J. Geocomputation with R. https://geocompr.robinlovelace.net/ Catalogue of Life, Pristimantis lanthanites (Lynch, 1975),Basionym: Eleutherodactylus lanthanites Lynch, 1975.