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

## ----eval=FALSE---------------------------------------------------------------
# # download raw IPS data from 2014
# data <- load_ips(
#   dataset = "all",
#   raw_data = TRUE,
#   time_period = 2014,
#   language = "eng"
# )
# 
# # download treated deforestation IPS data from 2018 in portuguese
# data <- load_ips(
#   dataset = "deforest",
#   raw_data = FALSE,
#   time_period = 2018,
#   language = "pt"
# )