<html>
<head>
<meta content="text/html; charset=ISO-8859-1"
http-equiv="Content-Type">
</head>
<body text="#000000" bgcolor="#FFFFFF">
Obrigado Prof. Paulo,<br>
<br>
Mas estar fora de escala é justamente meu problema, quando
tento plotar estes pontos sobre um shapefile, quando uso o grid
regular (plot(d1[,1],d1[,2])
) os pontos aparecem na minha imagem, porém quando uso o grid
rotacionado (points(drt[,1],drt[,2], col="red")), não aparece, pois
não tenho coordenadas UTM negativas e um Mod() não resolve o
problema,<br>
<br>
Obrigado,<br>
<br>
<br>
Alexandre<br>
<br>
<br>
<div class="moz-cite-prefix">Em 02/04/2013 06:58, Paulo Justiniano
escreveu:<br>
</div>
<blockquote
cite="mid:alpine.DEB.2.00.1304020758030.1609@pataxo.est.ufpr.br"
type="cite">No seu ultimo comando voce adicionou pontos ao grafico
anterior com points() entretanto os pontos estao fora da escala do
gráfico e nao aparecem
<br>
<br>
nba umtima linha simplesmente troque points() por plot()
<br>
<br>
On Tue, 2 Apr 2013, ASANTOS wrote:
<br>
<br>
<blockquote type="cite">Bom dia pessoal,
<br>
<br>
Estou cá de volta com o problema de rotacionar matrizes
para rotacionar um grid criado com expand.grid(), o exemplo
numérico que havia postado na lista esta OK, porém agora quando
emprego coordenadas geográficas em UTM não estou conseguindo
plotar, pois os valores no eixo x estão estranhos e o eixo y
esta negativo, alguém saberia me dar alguma sugestão, segue CRM
abaixo, obrigado
<br>
<br>
#
<br>
p0<-c(524237,7978856)### Primeiro ponto (Coordenada
geográfica conhecida em UTM)
<br>
points(p0[1],p0[2], col="red")
<br>
#
<br>
#
<br>
c0 <- seq(p0[1],p0[1]+400,by=100)### Criando o grid
<br>
d0 <- seq(p0[2],p0[2]+500,by=100)
<br>
d1 <- expand.grid(x=c0, y=d0)
<br>
plot(d1[,1],d1[,2])
<br>
#
<br>
d2<-as.matrix(d1)
<br>
ang<- 60 #### Angulo a ser rotacionado
<br>
Q<-rbind(c(cos(ang),sin(ang)),c(-sin(ang), cos(ang))) ##
Matriz de rotação
<br>
drt<-d2 %*% Q # Multiplicação de matrizes
<br>
points(drt[,1],drt[,2], col="red")
<br>
#
<br>
<br>
-- <br>
======================================================================
<br>
Alexandre dos Santos
<br>
Proteção Florestal
<br>
Coordenador do curso Técnico em Florestas
<br>
Vice Coordenador do curso de Engenharia Florestal
<br>
IFMT - Instituto Federal de Educação, Ciência e Tecnologia de
Mato Grosso
<br>
Campus Cáceres
<br>
Caixa Postal 244
<br>
Avenida dos Ramires, s/n
<br>
Bairro: Distrito Industrial
<br>
Cáceres - MT CEP: 78.200-000
<br>
Fone: (+55) 65 8132-8112 (TIM) (+55) 65 9686-6970 (VIVO)
<br>
<a class="moz-txt-link-abbreviated" href="mailto:e-mails:alexandresantosbr@yahoo.com.br">e-mails:alexandresantosbr@yahoo.com.br</a>
<br>
<a class="moz-txt-link-abbreviated" href="mailto:alexandre.santos@cas.ifmt.edu.br">alexandre.santos@cas.ifmt.edu.br</a>
<br>
======================================================================
<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>
<pre class="moz-signature" cols="72">--
======================================================================
Alexandre dos Santos
Proteção Florestal
Coordenador do curso Técnico em Florestas
Vice Coordenador do curso de Engenharia Florestal
IFMT - Instituto Federal de Educação, Ciência e Tecnologia de Mato Grosso
Campus Cáceres
Caixa Postal 244
Avenida dos Ramires, s/n
Bairro: Distrito Industrial
Cáceres - MT CEP: 78.200-000
Fone: (+55) 65 8132-8112 (TIM) (+55) 65 9686-6970 (VIVO)
<a class="moz-txt-link-abbreviated" href="mailto:e-mails:alexandresantosbr@yahoo.com.br">e-mails:alexandresantosbr@yahoo.com.br</a>
<a class="moz-txt-link-abbreviated" href="mailto:alexandre.santos@cas.ifmt.edu.br">alexandre.santos@cas.ifmt.edu.br</a>
======================================================================
</pre>
</body>
</html>