Olá Rodrigo,

O arquivo são as coordenadas da borda de uma área, em seguida pretendo delimitar a área e calcular sua área em ha, mas está ocorrendo o seguinte erro:

Error in storage.mode(poly) <- "double" : 
  (list) object cannot be coerced to type 'double'

Segue o código:
### <code r>
borda<-print(borda, digits = 10)
plot(bor)
polygon(bor)
class(bor)
if (!"classInt" %in% installed.packages()) {install.packages("classInt", dep=T)}
require(classInt)

# Área total em ha
areatotal<-areapl(borda)/10000
areatotal
### <code r>

 obrigado

Hélder Gramacho 
Recife-PE / 



Em 9 de maio de 2014 09:56, Rodrigo Coster <rcoster@gmail.com> escreveu:
Helder,

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()

> print(borda, digits = 10)
          V1         V2
1  733986.51 9071335.22
2  734009.45 9071338.72
3  734015.46 9071306.39
4  734021.79 9071274.28
5  733996.02 9071269.04
6  733966.42 9071263.69
7  733960.19 9071296.56
8  733954.19 9071328.78
9  733968.36 9071331.48
10 733983.10 9071334.43
11 733986.51 9071335.22



2014-05-09 9:52 GMT-03:00 Helder Gramacho <agrohelder@gmail.com>:
Bom dia pessoal,

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?

Segue o código e o arquivo disponibilizado no dropbox:

### <code r>

tokens    <- gsub("^.*/s/","",dirname(links))
fileNames <- basename(links)
newLinks  <- file.path("http://dl.dropbox.com/s", tokens, fileNames);
newLinks

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

borda=read.table(file="borda_pesq_r.txt",header=F)
borda
class(borda)
### </code>

Obrigado,
Hélder Gramacho 
Recife-PE / 


_______________________________________________
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.


_______________________________________________
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.