knitr::opts_chunk$set( collapse = TRUE, comment = "#" )
SPECIES web platform is an interactive tool for the analysis of ecological niches and forecast species potential distribution, as well as to build Complex Inference Networks to identify potential species interactions. SPECIES development is supported by C3-Centro de Ciencias de la Complejidad, Universidad Nacional Autónoma de México and the Comisión Nacional para el Conocimiento y Uso de la Biodiversidad (CONABIO).
This tutorial is a basic intriduction to use the r functions that connects to SPECIES api. This functions are contained in the developing package rspecies
. rspecies
is allocated in github public repositorie https://github.com/edelcallejoc/rspecies.
The information contained in this vignette is corresponds to the usages of r functions to interact with SPECIES api. There are four functions that allows to extract information about SPECIES database's names. Each function can be used for many porpuses from consulting species names to adjust models in several ways.
The simplest way to use get_species_names is for cheking species names available for a specific taxon rank. For example, the names of the species of Aedes
genus.
library(rspecies) aedes <- get_species_names(level = "genus", name = "Aedes", id = FALSE) head(aedes, n=5)
A more complex example is to extract species' name from a higher taxon level. For example, The names of the species of Mammalia
class.
mammal <- get_species_names(level = "class", name = "Mammalia", sublevel = "specie", id = FALSE) head(mammal, n=5)
It is important to declared id = FALSE
in order to avoid extensive computation. The id
argument is intended to be used for individual queries by species.
The function get_species_coords is made to extract the geographical coordinates of observations by species from the API of the SPECIES framework. The simplest way to use this function is to indicate the species
argument with the name of a particular species, eg Lynx rufus.
LR_coords <- get_species_coords(species = "Lynx rufus") head(LR_coords, n=5)
The date
argument is used to add collection date information, by default this argument is defined as TRUE. While the argument from
is still in development and at this moment it has no use.
LR_coords_ndate <- get_species_coords(species = "Lynx rufus", date = FALSE) head(LR_coords_ndate, n=5)
The download of the grid is done with the function get_species_grid, which takes as argument the resolution of the grid, (grid_res
). There are 4 possible values for the argument, 8,16,32 and 64.
Mex_grd32 <- get_species_grid(grid_res = 32) # using ggplot library(ggplot2) ggplot(fortify(Mex_grd32), aes(x = long, y = lat, group = id)) + geom_polygon() + geom_path(color="white") + coord_map()
The get_species_georel function is used to download the results of the model set in the SPECIES platform. For the moment the function is useful to extract the results of the model for a single species. However, it is possible to use the apply
family of functions to extract results from different models (do this operation with care since it can take a lot of time).
# Lynx rufus model with all Mammals LR_Model <- get_species_georel(target = "Lynx rufus", start_level = "class", value = "Mammalia", validation = FALSE, fossil = FALSE, no_date = TRUE, min_occ = 5, bioclim = FALSE) head(LR_Model, n = 5)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.