mapme.biodiversity (version 0.9.3)

deforestation_drivers: Calculate deforestation drivers

Description

This function extracts areal statistics for the drivers of deforestation based on the data source produced by Fritz et al (2022).

Usage

calc_deforestation_drivers()

Value

A function that returns an indicator tibble with deforestation drivers as variable and corresponding area (in ha) as value.

Details

The required resource for this indicator is:

• fritz_et_al

Examples

# \dontshow{
mapme.biodiversity:::.copy_resource_dir(file.path(tempdir(), "mapme-data"))
# }
if (FALSE) {
library(sf)
library(mapme.biodiversity)

outdir <- file.path(tempdir(), "mapme-data")
dir.create(outdir, showWarnings = FALSE)

mapme_options(
  outdir = outdir,
  verbose = FALSE
)

aoi <- system.file("extdata", "sierra_de_neiba_478140_2.gpkg",
  package = "mapme.biodiversity"
) %>%
  read_sf() %>%
  get_resources(get_fritz_et_al(resolution = 100)) %>%
  calc_indicators(calc_deforestation_drivers()) %>%
  portfolio_long()

aoi
}