# NOT RUN {
toybase_individual_2016_04 %>%
dplyr::group_by(AGLOMERADO) %>%
dplyr::summarise(tasa_actividad = sum(PONDERA[ESTADO==1])/sum(PONDERA)) %>%
map_agglomerates(agglomerates = AGLOMERADO,indicator = tasa_actividad)
# }
Run the code above in your browser using DataLab