dados1 <- le.pesquisa(dicionario = dicpes2005, pathname.in = caminho.microdados,
codigos = c("UF","V0102","V0103","V0301","V0302","V8005",
"V0401","V0402","V0403","V0404","V4703","V4704",
"V4705","V4707","V4718","V4729"),
quant = 408148)
names(dados1) <- c("UF","NCONTR","NSERIE","NORDEM","SEXO","IDADE","CONDDOM","CONDFAM",
"NFAM","RACA_COR","ANOSEST","CONDATV","CONDOCP","HTRAB","RENDTRAB",
"PESOP")
save(dados1, file = "dados1.RData")
??
Att.,
Rubem