<html>
<head>
<meta content="text/html; charset=ISO-8859-1"
http-equiv="Content-Type">
</head>
<body bgcolor="#FFFFFF" text="#000000">
Obrigado Prof. Paulo e Benilton pelas sugestões, problema resolvido
com função spDists().<br>
<br>
Segue solução:<br>
<br>
> ##Transformando em um objeto da classe espacial<br>
> require(sp)<br>
Carregando pacotes exigidos: sp<br>
> pontos<- SpatialPoints(cbind(lat,long))<br>
> pontos<- SpatialPoints(list(lat,long))<br>
> pontos<- SpatialPoints(data.frame(lat,long))<br>
> spDists(pontos)<br>
[,1] [,2] [,3] [,4] [,5] [,6]<br>
[1,] 0.0000 264.6224 858.24239 838.62983 805.24841 844.96686<br>
[2,] 264.6224 0.0000 1055.50604 1041.31888 1003.31949 1042.86528<br>
[3,] 858.2424 1055.5060 0.00000 34.05877 53.00000 13.45362<br>
[4,] 838.6298 1041.3189 34.05877 0.00000 43.41659 26.24881<br>
[5,] 805.2484 1003.3195 53.00000 43.41659 0.00000 39.82462<br>
[6,] 844.9669 1042.8653 13.45362 26.24881 39.82462 0.00000<br>
> <br>
<br>
Em 04/06/2012 18:51, Paulo Justiniano escreveu:
<blockquote
cite="mid:alpine.DEB.2.00.1206041851190.25944@pataxo.est.ufpr.br"
type="cite">voce deu uma olhada em dist() ?
<br>
<br>
<br>
me parece que tem algo já apra classes espaciais no sp
<br>
<br>
<br>
On Mon, 4 Jun 2012, ASANTOS wrote:
<br>
<br>
<blockquote type="cite">Boa noite pessoal,
<br>
<br>
Gostaria de calcular todas as distâncias de 6 coordenadas em
UTM, à partir de um objeto da classe espacial, para isto fiz:
<br>
<br>
### Cálculo da distancia entre todos os pontos em UTM
<br>
ninhos<-c("N01","N02","N03","N04","N05","N06")
<br>
lat<-c(0503252,0503319,0503716,0503682,0503688,0503707)
<br>
long<-c(7651950,7651694,7652672,7652670,7652627,7652662)
<br>
<br>
##Cálculo que compara a primeira coordenada com a segunda e
assim sucessivamente ....
<br>
<br>
lat.diff<-diff(lat)
<br>
long.diff<-diff(long)
<br>
d=(long.diff^2+lat.diff^2)^.5
<br>
d
<br>
##Porém não era bem isto que eu queria ainda
<br>
<br>
##Transformando em um objeto da classe espacial
<br>
require(sp)
<br>
pontos<- SpatialPoints(cbind(lat,long))
<br>
pontos<- SpatialPoints(list(lat,long))
<br>
pontos<- SpatialPoints(data.frame(lat,long))
<br>
<br>
Agora, gostaria de baseado no objeto espacial pontos, calcular
todas as combinações
<br>
de distâncias entre as coordenadas fornecidas. Alguém saberia me
indicar uma função em algum pacote que faz isso,
<br>
<br>
Obrigado,
<br>
<br>
-- <br>
Alexandre dos Santos
<br>
Engenheiro Florestal, Dr.
<br>
Universidade Federal de Lavras
<br>
Departamento de Entomologia
<br>
Laboratório de Entomologia Florestal
<br>
Caixa Postal 3037
<br>
37200-000 - Lavras/MG
<br>
Fone: +55 (35) 9223-0304
<br>
<br>
_______________________________________________
<br>
R-br mailing list
<br>
<a class="moz-txt-link-abbreviated" href="mailto:R-br@listas.c3sl.ufpr.br">R-br@listas.c3sl.ufpr.br</a>
<br>
<a class="moz-txt-link-freetext" href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a>
<br>
Leia o guia de postagem (<a class="moz-txt-link-freetext" href="http://www.leg.ufpr.br/r-br-guia">http://www.leg.ufpr.br/r-br-guia</a>) e
forneça código mínimo reproduzível.
<br>
<br>
</blockquote>
<br>
<fieldset class="mimeAttachmentHeader"></fieldset>
<br>
<pre wrap="">_______________________________________________
R-br mailing list
<a class="moz-txt-link-abbreviated" href="mailto:R-br@listas.c3sl.ufpr.br">R-br@listas.c3sl.ufpr.br</a>
<a class="moz-txt-link-freetext" href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a>
Leia o guia de postagem (<a class="moz-txt-link-freetext" href="http://www.leg.ufpr.br/r-br-guia">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo reproduzível.</pre>
</blockquote>
<br>
<br>
<pre class="moz-signature" cols="72">--
Alexandre dos Santos
Engenheiro Florestal, Dr.
Universidade Federal de Lavras
Departamento de Entomologia
Laboratório de Entomologia Florestal
Caixa Postal 3037
37200-000 - Lavras/MG
Fone: +55 (35) 9223-0304 </pre>
</body>
</html>