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

## ----eval=FALSE---------------------------------------------------------------
# # download raw SEEG data (all sectors) at the country level
# # note: dataset = "seeg" only works with raw_data = TRUE
# all_emissions <- load_seeg(
#   dataset = "seeg",
#   raw_data = TRUE,
#   geo_level = "country",
#   language = "eng"
# )

## ----eval=FALSE---------------------------------------------------------------
# # download treated agricultural emissions at the state level
# farming <- load_seeg(
#   dataset = "seeg_farming",
#   raw_data = FALSE,
#   geo_level = "state",
#   language = "eng"
# )

## ----eval=FALSE---------------------------------------------------------------
# # download treated land use change emissions at the state level
# land_use <- load_seeg(
#   dataset = "seeg_land",
#   raw_data = FALSE,
#   geo_level = "state",
#   language = "eng"
# )

## ----eval=FALSE---------------------------------------------------------------
# # download treated energy emissions at the municipality level
# energy <- load_seeg(
#   dataset = "seeg_energy",
#   raw_data = FALSE,
#   geo_level = "municipality",
#   language = "eng"
# )

## ----eval=FALSE---------------------------------------------------------------
# # download treated industrial process emissions at the state level
# industry <- load_seeg(
#   dataset = "seeg_industry",
#   raw_data = FALSE,
#   geo_level = "state",
#   language = "eng"
# )

## ----eval=FALSE---------------------------------------------------------------
# # download treated waste emissions at the state level
# residuals <- load_seeg(
#   dataset = "seeg_residuals",
#   raw_data = FALSE,
#   geo_level = "state",
#   language = "eng"
# )