## ----include = FALSE----------------------------------------------------------
knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>"
)

## ----eval=FALSE---------------------------------------------------------------
# # download treated deforestation data for 2023
# deforestation <- load_prodes(
#   dataset = "deforestation",
#   raw_data = FALSE,
#   time_period = 2023,
#   language = "eng"
# )

## ----eval=FALSE---------------------------------------------------------------
# # download treated deforestation data for 2008 to 2023
# deforestation_series <- load_prodes(
#   dataset = "deforestation",
#   raw_data = FALSE,
#   time_period = 2008:2023,
#   language = "eng"
# )

## ----eval=FALSE---------------------------------------------------------------
# # download 2007 (cumulative 1988-2007) plus all years up to 2023
# all_deforestation <- load_prodes(
#   dataset = "deforestation",
#   raw_data = FALSE,
#   time_period = c(2007, 2008:2023),
#   language = "eng"
# )

## ----eval=FALSE---------------------------------------------------------------
# # download treated residual deforestation data for 2020
# residual <- load_prodes(
#   dataset = "residual_deforestation",
#   raw_data = FALSE,
#   time_period = 2020,
#   language = "eng"
# )