tabulEIA

tabulEIA Automatize the process of building species occurrence list for EIA reports. Listed species are arearranged with their conservation and taxonomic status.

website

Package website.

Disclaimer

This software is preliminary or provisional. No warranty, expressed or implied, is made by the maintainer. Software releases constitute no warranty. The software is provided as is on the condition that the maintainer shall not be held liable or responsible for any damages resulting from the authorized or unauthorized use of the software.

What is tabulEIA?

tabulEIA provides an exhaustive list of species occurring at a given area of interest. It does so by retrieving pre-compiled data from many sources: fieldwork, eBird, iNaturalist, Flora-on, Atlases, Regional databases, EU reports. Lists are provided with taxonomic and conservation status and will be ready to be used in EIA report. Data being retrieved from:

Field inventories
Atlases (mammals, birds, Amphibians, Reptiles, Orchids)
Flora-on database
eBird (5 minute min. census)
iNaturalist (research grade records)
Natura 2000 Report

Installation

You can install the released version of tabulEIA from Github with:

library(devtools)
install_github("pecard/tabuleia")

Contribute

You are welcome to contribute to the package development and improvement by filling an issue at the package web page.

Code of Conduct

Please note that the tabulEIA project is released with a Contributor Code of Conduct. By contributing to this project, you agree to abide by its terms.

Usage

Run a basic example:

library(tabulEIA)
library(tidyverse)
library(sf)
library(geotidy)

# Copy geometry directly from QGIS wkt
pol <- st_geomfromtext('Polygon ((-8.2522 37.8960, -8.2513 37.8960, -8.2513 37.8951,
                       -8.2522 37.8951, -8.2522 37.8960))')
pol <- st_as_sf(pol) %>% st_set_crs(4326)
utm_all = utm_id(grid = utm10k, roi = pol, buff = NULL, contiguity = 'queen')

# Flora
# inventories from field work
dados_campo <- read.delim('~path_to_my_field_data/fielddata.txt')

tflora <- tabulEIA::tabulFlora(fielddata = dados_campo, utm_ae = utm_all$ae, utm_q = utm_all$contig,
                               biblio = 'all')
# Avifauna
tave = tabulEIA::tabulAve(fielddata = NULL, utm_ae = utm_ae, utm_q = utm_contig, atlas = atlas_aves, ebird = ebird)

pecard / tabuleia