data-raw/scripts/generate_argentina_toy_database.R

library(eph)
library(tidyverse)

####bases de datos#####
toy_base_eph_argentina <- eph::get_microdata(year = 2019,trimester = 1)

toy_base_eph_argentina <- toy_base_eph_argentina %>%
  sample_n(2000)

save(toy_base_eph_argentina,file = "data/toy_base_eph_argentina.rda")
Guidowe/occupationcross documentation built on Oct. 4, 2023, 12:09 p.m.