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

## ----eval=FALSE---------------------------------------------------------------
# # download treated land area data at the country level in 2017
# data <- load_censoagro(
#   dataset = "agricultural_land_area",
#   raw_data = FALSE,
#   geo_level = "country",
#   time_period = 2017,
#   language = "eng"
# )
# 
# # download treated temporary crop data by state in 1995 in portuguese
# data <- load_censoagro(
#   dataset = "vegetable_production_temporary",
#   raw_data = FALSE,
#   geo_level = "state",
#   time_period = 1995,
#   language = "pt"
# )
# 
# # download municipality-level cattle data (only available for livestock_production)
# data <- load_censoagro(
#   dataset = "livestock_production",
#   raw_data = FALSE,
#   geo_level = "municipality",
#   time_period = 2017,
#   language = "eng"
# )