Skip to content

Instantly share code, notes, and snippets.

@metodologia
Last active December 17, 2015 00:10
Show Gist options
  • Select an option

  • Save metodologia/5518669 to your computer and use it in GitHub Desktop.

Select an option

Save metodologia/5518669 to your computer and use it in GitHub Desktop.
Microdados com R - Parte 4
# Convertendo arquivos txt em csv usando as funções criadas por Marcos F Silva
# carregar o dicionário disponibilizado pelo IBGE
load('2011_dicPNAD.RData')
# listar itens da memória
ls()
# analisar as primeiras 15 linhas dos dicionários
head(dicdom2011, 15)
head(dicpes2011, 15)
# carregar as funções fwf2csv() e txt2df() desenvolvidas por Marcos
source("fwf2csv.R")
source("txt2df.R")
# ler os dados da PNAD 2011 domicílios
fwf2csv(input="2011_DOM.TXT", output="2011_DOM.csv", dic=dicdom2011, colunas=dicdom2011$cod) # transformando um arquivo .txt para .csv
# ler os dados da PNAD 211 pessoas
fwf2csv(input="2011_PES.TXT", output="2011_PES.csv", dic=dicpes2011, colunas=dicpes2011$cod)
# função fwf2csv() do pacote 'descr' desenvolvido por Jakson Aquino é mais rápida pois foi escrita em C ou C++
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment