• IVS - índice de vulnerabilidade social

• Plataforma IVS

• Estatísticos:
  • Wesley J. Silva
  • Igor Nascimento
  • Janaína C. Santos
  • Caio Nogueira
• Coordenador:
  • Marcio Bruno Ribeiro

• Censo demográfico 2000

• Censo demográfico 2010

• PNAD

• Auxiliares:
  • SINPC
  • Rendas imputadas, método FJP

• Rotinas em R

• Armazenamento em MonetDBLite

  • processamento otimizado para grandes bases de dados

  • uma proxy do MonetDB

  • entende linguagem R via integração com pacte dplyr

• Rotinas do Anthony Damico

• Dados reproduzíveis o máximo possível

  • repositório de rotinas em GitLab

  • máximo de transparência via documentação/metadados

• Territórios e categorias como parâmetros

• Metadados (ou o complemento destes) inseridos no próprio script

  • No caso do IVS, são inseridos complementos aos metadados disponíveis online

• Territórios e categorias como parâmetros

  # lista de categorias
  categorias    <-  c("sexo","raca","sit_dom")
  
  # lista de 'territorialidades' 
  territorios     <-c("macrorregiao","uf","rm")
  
  # lista de variávels
  variaveis <- c("rdpc_def","peso_pessoa")
  
  agreg_marg(banco, var = variaveis,
               byg = c("ano",territorios),
               mar = categorias,
               total.label = "geral",
               FUN = wtd.gini,
               byg.hier = T,w = peso_pessoa)

• Metadados (ou o complemento destes) inseridos no próprio script

  ## >> Indicador 1 - mulher adolescente com fliho-----
  
  # Mulher 10 a 17 anos
  mt <- mt %>% mutate(m10a17 = ifelse(v8005 %in% 10:17 & (v0302 %in% 4), 1L, 0L))
  
  # mulher de 0 a 17 anos com filho
  mt <- mt %>% mutate(m10a17_filho = ifelse( (v1101  %in%  1 | v1110  %in%  2) &
                                             (v0302  %in%  4), 1L,
                                             ifelse((v1101  %in%  9
                                             & v1110 %in% c(0,9)),NA, 0L)))
  # registrando metadados do indicador
  indicador1 <- data.frame(rotulo = "t_m10a17_filho",
                           descricao = "Percentual de mulheres de 10 a 17(...)",
                           v_numerador  = "m10a17_filho",
                           v_denominador = "m10a17")
  ## Detalhes:
  # São contabilizadas as mulheres que tiveram vilhos nascidos vivos e nascidos mortos
  ## OBS:
  # São Excluídos do denominador as mulheres que não declararam se tiveram filhos.    

• Metadados (possível aprimoramento)

    # registrando metadados do indicador
    indicador1 <- data.frame(descricao = "Percentual de mulheres de 10 a 17 que tiveram filho",
                             rotulo = "t_m10a17_filho",
                             v_numerador  = "m10a17_filho",
                             v_denominador = "m10a17",
                             detalhes = "São contabilizadas as mulheres que tiveram 
                             vilhos nascidos vivos e nascidos mortos",
                             observacoes = "São Excluídos do denominador as mulheres
                             que não declararam se tiveram filhos.")

• Mas por quê? (Próximo slide)

for(i in 1:NROW(indicador1)){
  cat(paste0("* indicador 1: ",indicador1[i,1]),"\n \n \n")
  for(j in 2:NCOL(indicador1)){
    cat(paste0("    - **",names(indicador1)[j],"**: ",indicador1[i,j]),"\n \n")
  }
}

• indicador 1: Percentual de mulheres de 10 a 17 que tiveram filho

  • rotulo: t_m10a17_filho

  • v_numerador: m10a17_filho

  • v_denominador: m10a17

  • detalhes: São contabilizadas as mulheres que tiveram vilhos nascidos vivos e nascidos mortos

  • observacoes: São Excluídos do denominador as mulheres que não declararam se tiveram filhos.

• Rotinas produtoras dos indicadores

  • IVS Censo 2000

  • IVS Censo 2010

  • IVS PNAD

• Todas fazem

  • leitura dos microdados

  • registro/cálculos de indicadores por território/categoria

  • registro/incremento de metadados

• ivs_censo_2010.csv

  – Nível do território e Território

  – cada categoria (com combinação de todos os subtotais)

• metadados_censo_2010.csv:
  • rotulo da variável na base
  • nome curto
  • descrição
  • eixo/tema/índice

• Combina os outputs (dados e metadados)

• Cálculo os índices compostos (índice IVS, índice IDHM, etc.)

• Calcula precisões de estimativas amostrais
  • estratégia:

\[ep(\hat{Y}) = \sqrt{\frac{1-f}{f}Ns^2(y)}\]