SPMN = Salario neto A4 = SEXO A4 = 0: Mujer A4 = 1: Hombre
Gaps in agriculture and minery
Gaps in manufacture and electricity sectors
Gaps in Water and construction sectors
Gaps in commerce and transport and storage sectors
Gaps in telecommunications and finance and insurance
Gaps in agriculture and minery
Gaps in agriculture and minery
Gaps scientific activities and support and administrative sectors
Gaps Public defense and education
Gaps in human assitence and entertainment
Gaps in Other services and homes as employees
Gaps controlling for insurance condition or no
Gaps controlling for working on central region or no
Gaps controlling for belonging to a workers sindicate
Gaps controlling for language command
Gaps controlling with full time
Gaps controlling with Firm size
Gaps controlling for full time job
Gaps controlling with secondary school
Gaps controlling with Zone
#set.seed(123)
# Randomly select 2946 observations from the dataset of men
#men_sample <- Brechas1[sample(nrow(Brechas1), 2988), ]
#men_sample1 <- reg_hombres$model[sample(nrow(reg_hombres$model), 2988), ]
#men_sample2 <- reg_hombres$model[sample(nrow(reg_hombres$model), 2988), ]
#men_sample3 <- reg_hombres$model[sample(nrow(reg_hombres$model), 2988), ]