teste = read.fwf("arquivo.txt", c(2, 5, 13))<div><br></div><div>O vetor contem os comprimentos dos campos...</div><div><br></div><div>b<span></span><br><br>On Thursday, 5 July 2012, Danielle Steffen  wrote:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
<div><div style="font-size:12pt;font-family:Courier New,courier,monaco,monospace,sans-serif"><div style="font-family:'Courier New',courier,monaco,monospace,sans-serif;font-size:12pt">Ola,</div><div style="font-family:'Courier New',courier,monaco,monospace,sans-serif;font-size:12pt">
<br></div><div style="font-family:'Courier New',courier,monaco,monospace,sans-serif;font-size:12pt">Estou batendo cabeca com o R. Estou com um dos arquivos txt da amostra do censo 2010, e apesar de saber importar com mascara de leitura em SPSS e SAS, estou me sentindo um pre-escolar no R. como faco importacao com mascara de leitura? sabe, aquela coisa de colocar </div>
<div style="font-family:'Courier New',courier,monaco,monospace,sans-serif;font-size:12pt">caracter 1 a 4 - var 1</div><div style="font-family:'Courier New',courier,monaco,monospace,sans-serif;font-size:12pt">
caracter 5
 a 7 - var 2</div><div style="font-family:'Courier New',courier,monaco,monospace,sans-serif;font-size:12pt"> e assim por diante.</div><div style="font-family:'Courier New',courier,monaco,monospace,sans-serif;font-size:12pt">
<br></div><div style="font-family:'Courier New',courier,monaco,monospace,sans-serif;font-size:12pt">Bati cabeca com a funcao scan, mas como ela nao me ama e sao quase 3h da manha por aqui, ela nao quis importar, a sintaxe foi ridicula, tentei enfiar a mascara numa lista dentro do what, com os comprimentos de cada campo do arquivo:</div>
<div style="font-family:'Courier New',courier,monaco,monospace,sans-serif;font-size:12pt"><br></div><div><div><font face="Courier New, courier, monaco, monospace, sans-serif">teste <- scan("C:/Users/Public/novo case/amostra.txt", what=list(</font></div>
<div><font face="Courier New, courier, monaco, monospace,
 sans-serif">length(2),length(5),length(13),length(8),length(3),length(1),length(2),length(3),length(2),length(1),length(2),length(2),length(1),length(3),length(3),length(2),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(4),length(1),length(7),length(7),length(3),length(3),length(1),length(7),length(7),length(7),length(1),length(7),length(7),length(7),length(1),length(1),length(2),length(2),length(1),length(1),length(2),length(1),length(1),length(1),length(3),length(3),length(3),length(1),length(7),length(7),length(7),length(1),length(2),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(4),length(5),length(1),length(1),length(1),length(1),length(6),length(6),length(4),length(1),length(6),length(4),length(7),length(4),length(7),length(4),length(7),length(5),length(6),length(4),length(3),length(1),length(1),length(1),length(1),length(1),length(1),length(6),length(1),len
gth(7),length(7),length(7),length(1),length(1),length(1),length(2),length(2),length(2),length(1),length(2),length(2),length(2),length(1),length(3),length(1),length(1),length(1),length(2),length(4),length(1),length(2),length(2),length(2),length(2),length(1),length(2),length(1),length(1),length(1),length(1),length(1),length(3),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),
length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1),length(1)</font></div>
<div><font face="Courier New, courier, monaco, monospace, sans-serif">))</font></div><div><font face="Courier New, courier, monaco, monospace, sans-serif"><br></font></div><div><font face="Courier New, courier, monaco, monospace, sans-serif">Mas esta obviamente errado e claro, nao sei pq.</font></div>
<div><font face="Courier New, courier, monaco, monospace, sans-serif"><br></font></div><div><font face="Courier New, courier, monaco, monospace, sans-serif">Alguem me ajuda? Nao precisa ser essa funcao, mas tentei achar uma que fosse a mais flexivel possivel, pq as outras que uso (read.table, read.csv, etc) elas supoe que
 o arquivo tem algum tipo de separador, nem que seja um espacinho qualquer pra quebrar o galho.</font></div><div><font face="Courier New, courier, monaco, monospace, sans-serif"><br></font></div><div><font face="Courier New, courier, monaco, monospace, sans-serif">Agradeco qq ajuda, e nao me zoem, estou morrendo de sono e odio do R.</font></div>
<div><font face="Courier New, courier, monaco, monospace, sans-serif"><br></font></div><div><font face="Courier New, courier, monaco, monospace, sans-serif">Abs,</font></div><div><font face="Courier New, courier, monaco, monospace, sans-serif">Danielle</font></div>
</div></div></div></blockquote></div>