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

## ----eval=FALSE---------------------------------------------------------------
# # download raw data at the country level from 2008 to 2010
# data <- load_cempre(
#   raw_data = TRUE,
#   geo_level = "country",
#   time_period = 2008:2010,
#   language = "eng"
# )
# 
# # download treated state-level data split by sector in portuguese
# data <- load_cempre(
#   raw_data = FALSE,
#   geo_level = "state",
#   time_period = 2008:2010,
#   language = "pt",
#   sectors = TRUE
# )