[R-br] Cálculo de coordenadas finais à partir da distância e ângulo [RESOLVIDO]

[ASANTOS]

Grande Walmes,

         Tentei por trigonometria básica, mas pelo caminho errado, o 
problema é que como os ângulos não eram retos não funcionava quando eu 
aplicava h^2=a^2+b^2, mas quando vi sua quarta linha do script ##angulos 
em radianos, caiu a ficha. Adorei a dica para lembrar dos catetos: com e 
sem sono.

Muito obrigado pela solução,

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





Em 07/06/2012 20:17, Walmes Zeviani escreveu:
> Alexandre,
>
> Não seria isso uma aplicação de trigonometria básica? Com a distância
> (hipotenusa) e angulo você encontra as projeções verticais (y) e
> horizontais (x) de cada novo ponto e a sua coordenada seria a soma
> deles valores (y e x) aos do ponto de referência.
>
> p0<- c(100,100)         ## Coordenada conhecida
> dist<- c(5,15,7.5,3.5)  ## Distância à partir de p0
> ang<- c(256,93,183,15)  ## Angulos em graus
> ang<- 2*pi*ang/360      ## angulos em radianos
> dist<- c(0, dist)
> ang<- c(0, ang)
>
> # projeções verticais, sin (seno sem sono, em pé, projeta no y)
> dy<- dist*sin(ang)
>
> # projeções verticais, cos (coseno com sono, deitado, projeta no x)
> dx<- dist*cos(ang)
>
> # verifica
> cbind(sqrt(dx^2+dy^2), dist)
>
> # coordenadas
> coord<- t(apply(cbind(x=dx, y=dy), 1, function(i) i+p0))
> coord
>
> # gráfico
> plot(coord)
>
> À disposição.
> Walmes.
>
> On 6/7/12, ASANTOS<alexandresantosbr em yahoo.com.br>  wrote:
>> Boa tarde pessoal,
>>
>>        Gostaria de calcular as coordenadas e representá-las à partir de
>> um ponto inicial (p0) com as distâncias (dist) e  ângulos (ang)
>> conhecidos, sendo:
>>
>> ##Cálculo das coordenadas à partir da distância e ângulo em relação à p0
>> p0<-c(100,100)##Coordenada conhecida
>> dist<-c(5,15,7.5,3.5)##Distância à partir de p0
>> ang<-c(256,93,183,15)
>>
>> Fiz algumas pesquisas e encontrei a função grid.curve() do pacote grid,
>> que faz a representação gráfica das distâncias(retas) dados o ponto
>> inicial (p0), pontos finais (x,y) e o ângulo (ang), meu problema é que
>> as coordenadas finais são as variáveis que desejo encontrar, para depois
>> fazer a representação gráfica Alguém teria alguma sugestão de por onde
>> eu poderia começar?
>>
>> 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
>> R-br em 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.
>>
>