if (FALSE) { # interactive()
# basic usage - download morador register
morador <- pof_data("2017-2018", "morador", cache_dir = tempdir())
# download domicilio register (includes EBIA)
domicilio <- pof_data("2017-2018", "domicilio", cache_dir = tempdir())
# select specific variables
df <- pof_data(
"2017-2018", "morador",
vars = c("COD_UPA", "ESTRATO_POF", "PESO_FINAL", "V0403"),
cache_dir = tempdir()
)
# with survey design (requires srvyr package)
morador_svy <- pof_data("2017-2018", "morador", as_survey = TRUE,
cache_dir = tempdir())
}
Run the code above in your browser using DataLab