deforestation_drivers {mapme.biodiversity}

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()

Details

The required resource for this indicator is:

• fritz_et_al

Value

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

Examples

## Not run: 
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

## End(Not run)