Via library(help=sp) encontrei spDists() e spDistsN1()...
E se isso nao fosse suficiente, tentaria:
help.search("distance")
b
2012/6/4 ASANTOS <[email protected]>:
> Boa noite pessoal,
>
> Gostaria de calcular todas as distâncias de 6 coordenadas em UTM, à
> partir de um objeto da classe espacial, para isto fiz:
>
> ### Cálculo da distancia entre todos os pontos em UTM
> ninhos<-c("N01","N02","N03","N04","N05","N06")
> lat<-c(0503252,0503319,0503716,0503682,0503688,0503707)
> long<-c(7651950,7651694,7652672,7652670,7652627,7652662)
>
> ##Cálculo que compara a primeira coordenada com a segunda e assim
> sucessivamente ....
>
> lat.diff<-diff(lat)
> long.diff<-diff(long)
> d=(long.diff^2+lat.diff^2)^.5
> d
> ##Porém não era bem isto que eu queria ainda
>
> ##Transformando em um objeto da classe espacial
> require(sp)
> pontos<- SpatialPoints(cbind(lat,long))
> pontos<- SpatialPoints(list(lat,long))
> pontos<- SpatialPoints(data.frame(lat,long))
>
> Agora, gostaria de baseado no objeto espacial pontos, calcular todas as
> combinações
> de distâncias entre as coordenadas fornecidas. Alguém saberia me indicar uma
> função em algum pacote que faz isso,
>
> Obrigado,
>
> --
> 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
>
> _______________________________________________
> R-br mailing list
> [email protected]
> 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
[email protected]
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.
