<div dir="ltr">Helder,<div><br></div><div>O arquivo está sendo baixado e lido corretamente, o R só oculta as casas decimais para melhorar a visualização. Da para aumentar o numero de casas decimais usando o parâmetro digits do print()</div>
<div><br></div><font face="courier new, monospace">> print(borda, digits = 10)<br>          V1         V2<br>1  733986.51 9071335.22<br>2  734009.45 9071338.72<br>3  734015.46 9071306.39<br>4  734021.79 9071274.28<br>5  733996.02 9071269.04<br>
6  733966.42 9071263.69<br>7  733960.19 9071296.56<br>8  733954.19 9071328.78<br>9  733968.36 9071331.48<br>10 733983.10 9071334.43<br>11 733986.51 9071335.22</font><br></div><div class="gmail_extra"><br><br><div class="gmail_quote">
2014-05-09 9:52 GMT-03:00 Helder Gramacho <span dir="ltr"><<a href="mailto:agrohelder@gmail.com" target="_blank">agrohelder@gmail.com</a>></span>:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
<div dir="ltr">Bom dia pessoal,<div><br></div><div>O arquivo txt abaixo deve ser importado com duas casas decimais nas duas colunas, entretanto na primeira, aparece com apenas 1 e na segunda nenhuma, tentei após a importação utilizar o comando signif() para exibir a quantidade correta de algarismos significativos sem sucesso, ao que parece o problema está na importação, como indicar a quantidade de caracteres a serem reconhecidos no comando read.table?</div>

<div><br></div><div>Segue o código e o arquivo disponibilizado no dropbox:</div><div><br><div>### <code r><br></div><div><div>links <- c("<a href="https://www.dropbox.com/s/o5i1vjua7ggniny/borda_pesq_r.txt" target="_blank">https://www.dropbox.com/s/o5i1vjua7ggniny/borda_pesq_r.txt</a>")</div>

<div><br></div><div>tokens    <- gsub("^.*/s/","",dirname(links))</div><div>fileNames <- basename(links)</div><div>newLinks  <- file.path("<a href="http://dl.dropbox.com/s" target="_blank">http://dl.dropbox.com/s</a>", tokens, fileNames);</div>

<div>newLinks</div><div><br></div><div>for (a in newLinks) {</div><div>  tryCatch(download.file(a, dest=basename(a), mode='wb'),</div><div>           error=function(...) print("Falha no download!"))}</div>

<div><br></div><div>borda=read.table(file="borda_pesq_r.txt",header=F)</div><div>borda</div><div>class(borda)</div><div>### </code><br></div><div><br></div><div>Obrigado,</div><div><div dir="ltr"><div style="text-align:center">

<font size="1"><i><b>Hélder Gramacho </b></i></font></div><div style="text-align:center"><font size="1">Recife-PE / </font><i style="font-size:x-small;color:rgb(51,51,255)"><div style="display:inline!important"><i><a href="mailto:agrohelder@hotmail.com" target="_blank">agrohelder@gmail.com</a></i></div>

</i></div><div style="text-align:center"><br></div></div></div>
</div></div></div>
<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></div>