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

## -----------------------------------------------------------------------------
library(CepalStatR)

## -----------------------------------------------------------------------------
indicators <- call.indicators(progress = FALSE)
head(indicators)

## -----------------------------------------------------------------------------
head(countries(language.en = TRUE))

## -----------------------------------------------------------------------------
population <- call.data(id.indicator = 1, progress = FALSE)
head(population)

## ----eval=FALSE---------------------------------------------------------------
# viewer.indicators()
# topic_map()

## ----eval=FALSE---------------------------------------------------------------
# pyramids(country = "Honduras", years = c(1, 5, 10, 15), progress = FALSE)
# 
# ranking.sdg(id.indicator = 3682, progress = FALSE)

## ----eval=FALSE---------------------------------------------------------------
# ranking.sdg(id.indicator = 3682, save = TRUE, file = file.path(tempdir(), "ranking_sdg.png"), progress = FALSE)