
Acho que isso deve resolver. http://www.flaviobarros.net/2014/09/24/leitura-da-pnad-2013-com-o-r/ Em 23/10/2014 01:13, <lutipilotto@yahoo.com.br> escreveu:
olá Vanessa,
também não consegui usar o pacote IBGEPesq, usei os comandos abaixo para ler e selecionar dados da PNAD 2008, acredito que devem funcionar para 2013.
################################################################################# ###Os arquivos dos microdados devem estar no diretório atual de trabalho para usar a função read.fwf### list.files()###lista todos os arquivos contidos no diretório de trabalho
source(file.choose()) #carregar a função selectvar da pasta funcoes source(file.choose()) #carregar as função getdic da pasta funcoes
# Gerar os dicionários de dados a partir dos scripts SAS, arquivos: 'input DOM2008.sas' e 'input PES2008.sas' dicPNAD2008Dom <- getdic(file.choose())# abrir o arquivo input DOM2008.txt, dentro da Pasta Dados PNAD2008 dicPNAD2008Pes <- getdic(file.choose())# abrir o arquivo input PES2008.txt, dentro da Pasta Dados PNAD2008
#salvar dicionários em arquivo csv para facilitar seleção de variáveis write.csv2(dicPNAD2008Dom, file="dicPNAD2008Dom.csv", row.names=FALSE) write.csv2(dicPNAD2008Pes, file="dicPNAD2008Pes.csv", row.names=FALSE)
head(dicPNAD2008Dom) str(dicPNAD2008Dom) nrow(dicPNAD2008Dom) dim(dicPNAD2008Dom)
head(dicPNAD2008Pes) str(dicPNAD2008Pes) nrow(dicPNAD2008Pes) dim(dicPNAD2008Pes)
# Para EXCLUSÃO do "UF" (que apresenta erro na importação por começar na mesma posição que número de controle):
dicPNAD2008Dom <- subset(dicPNAD2008Dom, cod !="UF") head(dicPNAD2008Dom) dim(dicPNAD2008Dom)
dicPNAD2008Pes <- subset(dicPNAD2008Pes, cod !="UF") head(dicPNAD2008Pes) dim(dicPNAD2008Pes)
####Usar estes comando para importar *apenas algumas variáveis* da base de dados dos DOMICÍLIOS
variaveis <- selectvar(dicPNAD2008Dom) # Com a tecla CTRL pressionada, selecione as variáveis de interesse:
PNAD2008Dom <- read.fwf("DOM2008.TXT", widths=variaveis$tamanho, comment.char="", strip.white=TRUE) names(PNAD2008Dom) <- variaveis$cod head(PNAD2008Dom)
names(PNAD2008Dom)<-c("ncontr", "nserie", "tmorador", "pesodom", "rendadom", "cadUSF", "datacadUSF")#renomear todas variáveis do dataframe head(PNAD2008Dom) dim(PNAD2008Dom) ###########################################################################
Att., Luciane
Enviado do Email do Windows
*De:* Vanessa Felix <vanessa.felix.est@gmail.com> *Enviado:* quinta-feira, 25 de setembro de 2014 18:12 *Para:* r-br@listas.c3sl.ufpr.br
Pessoal, Eu tô querendo usar os dados da PNAD 2013 mas não consigo usar o pacote IBGEPesq. Fica aparecendo esse erro aqui:
library(IBGEPesq) Error: package ‘IBGEPesq’ was built before R 3.0.0: please re-install it
Tem alguma opção que não seja reinstalar o R? Se alguém puder ajudar...
att,
--
------------------------------------------------------------------------------------------ Vanessa Felix do Nascimento Sergio Graduada em Estatística - ICE/UFJF Mestranda em Saúde Coletiva - IMS/UERJ (32) 8854-4881 / 9142-8428 (21) 97656-3448
-------------------------------------------------------------------------------------------
_______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.