Title: | 'Native Status Resolver' |
Version: | 0.1.0 |
Description: | Provides access to the 'Native Status Resolver' (NSR) https://github.com/ojalaquellueva/nsr API through R. The user supplies plant taxonomic names and political divisions and the package returns information about their likely native status (e.g., native, non-native,endemic), along with information on how those decisions were made. |
Depends: | R (≥ 3.5.0) |
License: | MIT + file LICENSE |
Encoding: | UTF-8 |
LazyData: | true |
Imports: | jsonlite, httr |
Suggests: | knitr, rmarkdown, testthat, devtools, BIEN, vcr (≥ 0.6.0) |
VignetteBuilder: | knitr |
RoxygenNote: | 7.3.2 |
NeedsCompilation: | no |
Packaged: | 2024-10-14 21:21:19 UTC; Brian Maitner |
Author: | Brian Maitner [aut, cre], Brad Boyle [aut] |
Maintainer: | Brian Maitner <bmaitner@gmail.com> |
Repository: | CRAN |
Date/Publication: | 2024-10-16 18:00:02 UTC |
Check the native status for plant species in a political region
Description
NSR returns information on native status for species within a political region.
Usage
NSR(occurrence_dataframe, ...)
Arguments
occurrence_dataframe |
A properly formatted dataframe, see https://bien.nceas.ucsb.edu/bien/tools/nsr/batch-mode/ |
... |
Additional arguments passed to internal functions. |
Value
Dataframe containing NSR results.
Examples
## Not run:
results <- NSR(occurrence_dataframe = nsr_testfile)
# Inspect the results
head(results, 10)
# That's a lot of columns. Let's display one row vertically
# to get a better understanding of the output fields
results.t <- t(results[,2:ncol(results)])
results.t[,1,drop =FALSE]
# Summarize the main results
results[ 1:10,
c("species", "country", "state_province", "native_status", "native_status_reason")]
# Compare summary flag isIntroduced to more detailed native_status values
# and inspect souces consulted
results[ 1:10,
c("species", "country", "state_province", "native_status", "isIntroduced", "native_status_sources")]
## End(Not run)
Get citation information
Description
Returns information needed to cite the NSR
Usage
NSR_citations(...)
Arguments
... |
Additional arguments passed to internal functions. |
Value
Dataframe containing bibtex-formatted citation information
Note
This function provides citation information in bibtex format that can be used with reference manager software (e.g. Paperpile, Zotero). Please do remember to cite both the sources and the NSR, as the NSR couldn't exist without these sources!
Examples
{
citation_info <- NSR_citations()
}
Get NSR data dictionary
Description
Returns information from the NSR data dictionary
Usage
NSR_data_dictionary(native_status = FALSE, ...)
Arguments
native_status |
Logical. If FALSE(Default) returns information on fields. If TRUE, returns information on Native Status categories. |
... |
Additional arguments passed to internal functions. |
Value
Data.frame containing requested data dictionary contents.
Examples
{
NSR_fields <- NSR_data_dictionary()
status_codes <- NSR_data_dictionary(native_status = TRUE)
}
Get NSR metadata
Description
Returns metadata on NSR including version and citation information
Usage
NSR_metadata(bibtex_file = NULL, ...)
Arguments
bibtex_file |
Optional output file for writing bibtex citations. |
... |
Additional arguments passed to internal functions. |
Value
List containing: (1) bibtex-formatted citation information, (2) information about NSR data sources, and (3) NSR version information.
Note
This function provides citation information in bibtex format that can be used with reference manager software (e.g. Paperpile, Zotero). Please remember to cite both the sources and the NSR, as the NSR couldn't exist without these sources!
This function is a wrapper that returns the output of the functions NSR_citations, NSR_sources, and NSR_version.
Examples
{
metadata <- NSR_metadata()
}
Get information on political divisions with checklists within the NSR
Description
NSR_political_divisions returns information on political divisions with checklist information present in the NSR.
Usage
NSR_political_divisions(by_country = TRUE, ...)
Arguments
by_country |
Logical. If TRUE (the default), will return a data.frame of checklists for each country. If FALSE, will return a data.frame of countries for each checklist. |
... |
Additional parameters passed to internal functions. |
Value
data.frame containing information on political divisions within the NSR database.
Note
Setting checklist to FALSE returns a list of political divisions that can be used to standardize spellings.
Examples
## Not run:
#To get a list of all political divisions with comprehensive checklists:
checklists_per_country <- NSR_political_divisions()
#To get a list of all checklists the associated countries, set "by_country" to FALSE
countries_per_checklist <- NSR_political_divisions(by_country=FALSE)
## End(Not run)
Check the native status for plant species in a political region
Description
NSR_simple returns information on native status for species within a political region.
Usage
NSR_simple(
species = NULL,
country = NULL,
state_province = NULL,
county_parish = NULL,
...
)
Arguments
species |
A single species or a vector of species, with genus and specific epithet separated by a space. |
country |
A single country or a vector of countries. If a vector, length must equal length of species vector. |
state_province |
A single state/province or a vector of states. If a vector, length must equal length of species vector. |
county_parish |
A single county/parish or a vector of counties. If a vector, length must equal length of species vector. |
... |
Additional arguments passed to internal functions. |
Value
Dataframe containing NSR results.
Examples
## Not run:
results <- NSR_simple(species = "Acer rubrum",
country = "Canada",state_province = "Ontario")
results <- NSR_simple(species = c("Acer rubrum", "Aspen tremuloides") ,
country = c("Canada","Canada"),state_province = c("Ontario","Ontario"))
## End(Not run)
Get information on sources used by the NSR
Description
Return metadata about the current NSR sources
Usage
NSR_sources(...)
Arguments
... |
Additional arguments passed to internal functions. |
Value
Dataframe containing information about the sources used in the current NSR version.
Examples
{
sources <- NSR_sources()
}
Make a template for an NSR query
Description
NSR_template builds a template that can be populated to submit an NSR query.
Usage
NSR_template(nrow = 1)
Arguments
nrow |
The number of rows to include in the template |
Value
Template data.frame that can be populated and then used in NSR queries.
Examples
## Not run:
template<-NSR_template(nrow = 2)
template$genus<-"Acer"
template$species<-c("Acer rubrum", "Acer saccharum")
template$country<-"Canada"
template$user_id<-1:2
results <- NSR(occurrence_dataframe = template)
## End(Not run)
Get metadata on current NSR version
Description
Return metadata about the current NSR version
Usage
NSR_version(...)
Arguments
... |
Additional arguments passed to internal functions. |
Value
Dataframe containing current NSR version number, build date, and code version.
Examples
{
NSR_version_metadata <- NSR_version()
}
Check whether the internet is on
Description
Check for internet
Usage
check_internet()
Value
TRUE if internet connection is detected, FALSE otherwise.
Handle API access and format
Description
Internal function for handling accessing the API,data formatting, and errors
Usage
nsr_core(
url = "https://nsrapi.xyz/nsr_wsb.php",
mode,
data_json = NULL,
batches = NULL,
skip_internet_check = FALSE
)
Arguments
url |
Server URL to use. Defaults to the stable production version |
mode |
API mode to use. One of "collaborators", |
data_json |
Either NULL (the default) or properly formatted json |
batches |
NULL or Numeric. Optional number of batches to divide the request into for parallel processing. |
Example NSR data
Description
A sample dataset showing the proper formatting of NSR inputs.
Usage
nsr_testfile
Format
A data.frame with 22 observations of 5 variables:
- taxon
taxon, "Genus species" format, with specific epithet optional
- country
country that a species occurs within
- state_province
state/province that a species occurs within
- county_parish
county/parish that a species occurs within
- user_id
unique numeric ID that can be used to link to original dataset
...