<div dir="ltr">Olá Luciane, <div><br></div><div>A idéia da função selectvar() é permitir ao usuário selecionar as variáveis com base na descrição das mesmas. No seu caso, vi que diversas variáveis não possuem uma descrição, o que torna o uso desta função um pouco sem sentido.</div><div><br></div><div>Uma abordagem pode ser a seguinte:</div><div><br></div><div><div># Definir o diretóro de trabalho</div><div>setwd("C:\\Users\\Marcos\\Documents\\PNAD")</div><div><br></div><div># Importar funções auxiliares</div><div>source("getdic.R")</div><div><br></div><div># Obter o dicionário</div><div>dic <- getdic("INPUT PES2003.TXT")</div><div><br></div><div><div># Excluir a variável UF</div><div>dic <- subset(dic, cod != "UF") </div></div><div><br></div><div>#  Variáveis a serem importadas V1701 e V1377</div><div>variaveis_interesse  <- ifelse(dic$cod %in% c("V1701", "V1377"), dic$tamanho, dic$tamanho * (-1))</div><div><br></div><div># Importa os dados</div><div>dados <- read.fwf("PES2003.TXT", widths=variaveis_interesse, comment.char="", strip.white=TRUE)</div><div><br></div></div><div>Acho que deve funcionar. Ainda não testei :)</div><div><br></div><div>Atualmente existem outras opções para a importação de microdados que podem ser interessantes.</div><div><br></div><div>Dê uma olhada nos pactoes LaF e SAScii.</div><div><br></div><div>Boa Sorte!</div><div><br></div></div><div class="gmail_extra"><br><div class="gmail_quote">Em 24 de março de 2015 09:52, Luciane Maria Pilotto <span dir="ltr"><<a href="mailto:lutipilotto@yahoo.com.br" target="_blank">lutipilotto@yahoo.com.br</a>></span> escreveu:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">Bom dia,<br>
<br>
estou tentando ler as variáveis da PNAD de 2003 - V1701 a V1377- relacionadas ao suplemento Saúde- e as mesmas aparecem como NA. O banco está disponível no site do IBGE <a href="http://www.ibge.gov.br/home/estatistica/populacao/trabalhoerendimento/pnad2013/microdados.shtm" target="_blank">http://www.ibge.gov.br/home/estatistica/populacao/trabalhoerendimento/pnad2013/microdados.shtm</a>.<br>
<br>
Também podem ser acessados no dropbox: <a href="https://www.dropbox.com/sh/d0z62bg4qqyg2x3/AAAVDYWjVlb4JpUTYlQfvq-Ka?dl=0" target="_blank">https://www.dropbox.com/sh/d0z62bg4qqyg2x3/AAAVDYWjVlb4JpUTYlQfvq-Ka?dl=0</a>.<br>
<br>
Estou usando os comandos abaixo:<br>
<br>
#----------------Ler microdados da PNAD 2003 (variáveis referente ao suplemento Saúde) utilizando a função read.fwf.r ----------------------#<br>
<br>
source(file.choose()) #carregar a função selectvar da pasta funcoes<br>
source(file.choose()) #carregar a função getdic da pasta funcoes<br>
<br>
# Gerar os dicionários de dados a partir dos  arquivos:  'input PES2003.txt'<br>
dicPNAD2003Pes <- getdic(file.choose())# abrir o arquivo input PES2003.txt, dentro da Pasta Input<br>
<br>
head(dicPNAD2003Pes)<br>
str(dicPNAD2003Pes)<br>
nrow(dicPNAD2003Pes)<br>
dim(dicPNAD2003Pes)<br>
<br>
# Para EXCLUSÃO do "UF" (que apresenta erro na importação por começar na mesma posição que número de controle):<br>
<br>
dicPNAD2003Pes <- subset(dicPNAD2003Pes, cod !="UF")<br>
head(dicPNAD2003Pes)<br>
dim(dicPNAD2003Pes)<br>
<br>
####Usar estes comandos para importar *apenas algumas variáveis* da base de dados das PESSOAS<br>
<br>
variaveis <- selectvar(dicPNAD2003Pes) # Com a tecla CTRL pressionada, selecione as variáveis de interesse, neste caso são as que aparecem como NA:<br>
Erro em substring(x, first, last) : invalid substring arguments<br>
<br>
### PROBLEMA: Ao abrir a janela das variáveis utilizando o comando acima, as variáveis de interesse referentes a saúde aparecem como NA, diferentemente das demais variáveis que aparecem no banco. No dicionário as mesmas aparecerem corretamente.<br>
<br>
Atenciosamente,<br>
<br>
__________________________________________________<br>
Luciane Maria Pilotto<br>
<br>
<br>
_______________________________________________<br>
R-br mailing list<br>
<a href="mailto:R-br@listas.c3sl.ufpr.br">R-br@listas.c3sl.ufpr.br</a><br>
<a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" target="_blank">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br>
Leia o guia de postagem (<a href="http://www.leg.ufpr.br/r-br-guia" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo reproduzível.<br>
</blockquote></div><br><br clear="all"><div><br></div>-- <br><div class="gmail_signature">Marcos F. Silva<br><a href="http://sites.google.com/site/marcosfs2006" target="_blank">http://sites.google.com/site/marcosfs2006</a></div>
</div>