<html><body><div style="color:; background-color:; font-family:arial, helvetica, sans-serif;font-size:13px"><div style="font-family: arial, helvetica, sans-serif; font-size: 13px; ">Obrigado Elias, </div><div style="font-family: arial, helvetica, sans-serif; font-size: 13px; "><br></div><div style="font-family: arial, helvetica, sans-serif; font-size: 13px; color: rgb(0, 0, 0); background-color: transparent; font-style: normal; ">Passou despercebido, corrigido:</div><div style="background-color: transparent; "><div style="background-color: transparent; "><font size="2">### coordenadas dos pontos</font></div><div style="background-color: transparent; "><font size="2"> x <- c(524227,524268,524268,524227,524227)</font></div><div style="background-color: transparent; "><font size="2"> y <- c(7978963,7978963,7978846,7978846,7978963)</font></div><div style="background-color: transparent; "><font size="2"> #</font></div><div
style="background-color: transparent; "><font size="2"> #</font></div><div style="background-color: transparent; "><font size="2"> ### monta SpatialPointsDataFrame, como nao ha</font></div><div style="background-color: transparent; "><font size="2"> ### dados, criado um data.frame com a coluna ID</font></div><div style="background-color: transparent; "><font size="2"> require(sp)</font></div><div style="background-color: transparent; "><font size="2"><br></font></div><div style="background-color: transparent; "><font size="2"> Pontos <- SpatialPointsDataFrame(SpatialPoints(cbind(x,y)),data=data.frame(ID=1:length(x)))</font></div><div style="background-color: transparent; "><font size="2"><br></font></div><div style="background-color: transparent; "><font size="2">### assumindo uma particular projecao, e'</font></div><div style="background-color: transparent; "><font size="2">### necessario verificar se e' mesmo
esta</font></div><div style="background-color: transparent; "><font size="2">proj4string(Pontos) <- CRS('+proj=utm +datum=WGS84')</font></div><div style="background-color: transparent; "><font size="2">require(plotGoogleMaps)</font></div><div style="background-color: transparent; "><font size="2">plotGoogleMaps(Pontos)</font></div><div style="background-color: transparent; color: rgb(0, 0, 0); font-size: 13px; font-family: arial, helvetica, sans-serif; font-style: normal; "><font size="2"><br></font></div><div style="background-color: transparent; color: rgb(0, 0, 0); font-size: 13px; font-family: arial, helvetica, sans-serif; font-style: normal; "><font size="2"><br></font></div></div> <div style="font-family: arial, helvetica, sans-serif; font-size: 10pt; "> <div style="font-family: 'times new roman', 'new york', times, serif; font-size: 12pt; "> <div dir="ltr"> <font size="2" face="Arial"> <hr size="1"> <b><span
style="font-weight:bold;">De:</span></b> Elias T. Krainski <eliaskrainski@yahoo.com.br><br> <b><span style="font-weight: bold;">Para:</span></b> "r-br@listas.c3sl.ufpr.br" <r-br@listas.c3sl.ufpr.br> <br> <b><span style="font-weight: bold;">Enviadas:</span></b> Quarta-feira, 26 de Setembro de 2012 8:26<br> <b><span style="font-weight: bold;">Assunto:</span></b> Re: [R-br] RgoogleMaps e rgdal<br> </font> </div> <br><div id="yiv2064547879"><div><div style="color: rgb(0, 0, 0); background-color: rgb(255, 255, 255); font-family: 'times new roman', 'new york', times, serif; font-size: 12pt; "><div><span>Essas coordenadas não estão em latlong. Coordenadas em latlong são em graus e vão de -180 a 180 (longitude) e de -90 a 90 (latitude).</span></div><div> </div><div>Elias T. Krainski<br><blockquote style="border-left:2px solid rgb(16, 16, 255);margin-left:5px;margin-top:5px;padding-left:5px;"> <div style="font-family: 'times new roman',
'new york', times, serif; font-size: 12pt; "> <div style="font-family: 'times new roman', 'new york', times, serif; font-size: 12pt; "> <div dir="ltr"> <font size="2" face="Arial"> <hr size="1"> <b><span style="font-weight:bold;">De:</span></b> ASANTOS <alexandresantosbr@yahoo.com.br><br> <b><span style="font-weight:bold;">Para:</span></b> r-br@listas.c3sl.ufpr.br <br> <b><span style="font-weight:bold;">Enviadas:</span></b> Terça-feira, 25 de Setembro de 2012
22:25<br> <b><span style="font-weight:bold;">Assunto:</span></b> Re: [R-br] RgoogleMaps e rgdal<br> </font> </div> <br><div id="yiv2064547879">
<div>
Boa noite pessoal,<br>
<br>
Refazendo o exemplo do Elias em coordenadas UTM, não tive
sucesso (Erro: Geographical CRS given to non-conformant data). Olhei
o datum e estava OK e também no manual e não me parece que há nada
de errado, inclusive o exemplo clássico do meuse do pacote gstat
utilizado no exemplo do pacote plotGoogleMaps esta em UTM, alguém
poderia dar um help, segue CRM abaixo<br>
<br>
#<br>
### coordenadas dos pontos<br>
x <- c(524227,524268,524268,524227,524227)<br>
y <- c(7978963,7978963,7978846,7978846,7978963)<br>
#<br>
#<br>
### monta SpatialPointsDataFrame, como nao ha<br>
### dados, criado um data.frame com a coluna ID<br>
require(sp)<br>
Carregando pacotes exigidos: sp<br>
Pontos <- SpatialPointsDataFrame(SpatialPoints(cbind(x,y)),<br>
+ data=data.frame(ID=1:length(x)))<br>
<br>
### assumindo uma particular projecao, e'<br>
### necessario verificar se e' mesmo esta<br>
proj4string(Pontos) <- CRS('+proj=longlat +datum=WGS84')<br>
Erro em `proj4string<-`(`*tmp*`, value = <S4 object of class
"CRS">) : <br>
Geographical CRS given to non-conformant data: 524268 7978963<br>
<br>
require(plotGoogleMaps)<br>
plotGoogleMaps(Pontos)<br>
Erro em spTransform(xSP, CRSobj, ...) : <br>
No transformation possible from NA reference system<br>
<br>
<br>
<br>
<br>
<div class="yiv2064547879moz-cite-prefix">Em 05/09/2012 07:44, Elias T. Krainski
escreveu:<br>
</div>
<blockquote type="cite">
<div style="color: rgb(0, 0, 0); background-color: rgb(255, 255, 255); font-family: 'times new roman', 'new york', times, serif; font-size: 12pt; ">
<div><span>
<div>Lamento postar codigo sem teste... Este agora foi
testado e funciona.</div>
<div><br>
</div>
<div style="color: rgb(0, 0, 0); font-size: 16px; font-family: 'times new roman', 'new york', times, serif; background-color: transparent; font-style: normal; ">###
coordenadas dos pontos </div>
<div>x <- c(-43.565,-43.564,-43.563,-43.565,-43.564) </div>
<div>y <- c(-10.518,-10.466,-10.412,-10.516,-10.474) </div>
<div><br>
</div>
<div>### monta SpatialPointsDataFrame, como nao ha </div>
<div>### dados, criado um data.frame com a coluna ID</div>
<div>require(sp)</div>
<div>Pontos <-
SpatialPointsDataFrame(SpatialPoints(cbind(x,y)),</div>
<div> data=data.frame(ID=1:length(x)))</div>
<div><br>
</div>
<div>### assumindo uma particular projecao, e'</div>
<div>### necessario verificar se e' mesmo esta</div>
<div>proj4string(Pontos) <- CRS('+proj=longlat
+datum=WGS84')</div>
<div><br>
</div>
<div>### sobrepoe ao google Maps e visualiza</div>
<div>require(plotGoogleMaps) </div>
<div>plotGoogleMaps(xyd)</div>
<div><br>
</div>
<div>### melhores informacoes ver</div>
<div>vignette("plotGoogleMaps-intro")</div>
<div style="font-family: 'times new roman', 'new york', times, serif; font-size: 12pt; "><br>
</div>
</span></div>
<div style="font-family: 'times new roman', 'new york', times, serif; font-size: 12pt; "> </div>
<div style="font-family: 'times new roman', 'new york', times, serif; font-size: 12pt; ">Elias T. Krainski<br>
<blockquote style="border-left:2px solid rgb(16, 16, 255);margin-left:5px;margin-top:5px;padding-left:5px;">
<div style="font-family: 'times new roman', 'new york', times, serif; font-size: 12pt; ">
<div style="font-family: 'times new roman', 'new york', times, serif; font-size: 12pt; ">
<div dir="ltr"> <font face="Arial" size="2">
<hr size="1"> <b><span style="font-weight:bold;">De:</span></b>
Mauro Sznelwar <a rel="nofollow" class="yiv2064547879moz-txt-link-rfc2396E" ymailto="mailto:sznelwar@uol.com.br" target="_blank" href="mailto:sznelwar@uol.com.br"><sznelwar@uol.com.br></a><br>
<b><span style="font-weight:bold;">Para:</span></b>
Elias T. Krainski <a rel="nofollow" class="yiv2064547879moz-txt-link-rfc2396E" ymailto="mailto:eliaskrainski@yahoo.com.br" target="_blank" href="mailto:eliaskrainski@yahoo.com.br"><eliaskrainski@yahoo.com.br></a>
<br>
<b><span style="font-weight:bold;">Enviadas:</span></b>
Terça-feira, 4 de Setembro de 2012 23:03<br>
<b><span style="font-weight:bold;">Assunto:</span></b>
Re: [R-br] RgoogleMaps e rgdal<br>
</font> </div>
<br>
<div id="yiv2064547879">
<style></style>
<div>
<div><font face="Arial">Continua não dando certo:</font></div>
<div><font face="Arial">Creito que tem um erro no <span style="BACKGROUND-COLOR:transparent;">xy <-
SpatialPoints(cbind(xy)) que deveria ser</span></font></div>
<div><font face="Arial"><span style="BACKGROUND-COLOR:transparent;">
<div style="background-color: transparent; font-family: Arial, Helvetica, sans-serif; color: rgb(69, 69, 69); font-size: 12px; "><font size="3"><span style="BACKGROUND-COLOR:transparent;">xy
<- SpatialPoints(cbind(x,y)) </span></font></div>
<div style="background-color: transparent; font-family: Arial, Helvetica, sans-serif; color: rgb(69, 69, 69); font-size: 12px; "><font size="3"><span style="BACKGROUND-COLOR:transparent;">E
mesmo corrigindo veja o acentece:</span></font></div>
<div style="background-color: transparent; font-family: Arial, Helvetica, sans-serif; color: rgb(69, 69, 69); font-size: 12px; "><font size="3"><span style="BACKGROUND-COLOR:transparent;"><font color="#000000" size="2">>
plotGoogleMaps(x,y)<br>
Erro em function (classes, fdef,
mtable) : <br>
unable to find an inherited method
for function "spTransform", for
signature "numeric", "CRS"<br>
> </font></span><br>
</font></div>
</span><br>
</font></div>
<blockquote style="BORDER-LEFT:#000000 2px solid;PADDING-LEFT:5px;PADDING-RIGHT:0px;MARGIN-LEFT:5px;MARGIN-RIGHT:0px;">
<div><br>
</div>
<div style="background-color: rgb(255, 255, 255); font-family: 'times new roman', 'new york', times, serif; color: rgb(0, 0, 0); font-size: 12pt; ">
<div><span>
<div style="background-color: transparent; font-family: Arial, Helvetica, sans-serif; color: rgb(69, 69, 69); font-size: 12px; ">Troquei
os pacotes. É necessário o pacote
plotGoogleMaps. Corrigindo:</div>
<div style="background-color: transparent; font-family: Arial, Helvetica, sans-serif; color: rgb(69, 69, 69); font-size: 12px; "><br>
y <-
c(-43.565,-43.564,-43.563,-43.565,-43.564) <br>
</div>
<div style="background-color: transparent; font-family: Arial, Helvetica, sans-serif; color: rgb(69, 69, 69); font-size: 12px; ">x
<- <span style="BACKGROUND-COLOR:transparent;">c(-10.518,-10.466,-10.412,-10.516,-10.474) </span><span style="BACKGROUND-COLOR:transparent;"> </span></div>
<div><span style="background-color: transparent; font-family: Arial, Helvetica, sans-serif; color: rgb(69, 69, 69); font-size: 12px; "><br>
</span></div>
<div style="background-color: transparent; font-family: Arial, Helvetica, sans-serif; color: rgb(69, 69, 69); font-size: 12px; ">require(sp)</div>
<div style="background-color: transparent; font-family: Arial, Helvetica, sans-serif; color: rgb(69, 69, 69); font-size: 12px; "><span style="BACKGROUND-COLOR:transparent;">xy
<- SpatialPoints(cbind(xy))</span><br>
</div>
<div style="background-color: transparent; font-family: Arial, Helvetica, sans-serif; color: rgb(69, 69, 69); font-size: 12px; "><br>
</div>
<div style="background-color: transparent; font-family: Arial, Helvetica, sans-serif; color: rgb(69, 69, 69); font-size: 12px; ">require(plotGoogleMaps) </div>
<div style="background-color: transparent; font-family: Arial, Helvetica, sans-serif; color: rgb(69, 69, 69); font-size: 12px; ">plotGoogleMaps(xy)</div>
</span></div>
<div> </div>
<div>Elias T. Krainski<br>
<blockquote style="BORDER-LEFT:rgb(16,16,255) 2px solid;MARGIN-TOP:5px;PADDING-LEFT:5px;MARGIN-LEFT:5px;">
<div style="font-family: 'times new roman', 'new york', times, serif; font-size: 12pt; ">
<div style="font-family:'times new
roman', 'new york', times, serif;font-size:12pt;"> </div>
</div>
</blockquote>
</div>
</div>
</blockquote>
</div>
</div>
<br>
<br>
</div>
</div>
</blockquote>
</div>
</div>
<br>
<fieldset class="yiv2064547879mimeAttachmentHeader"></fieldset>
<br>
<pre>_______________________________________________
R-br mailing list
<a rel="nofollow" class="yiv2064547879moz-txt-link-abbreviated" ymailto="mailto:R-br@listas.c3sl.ufpr.br" target="_blank" href="mailto:R-br@listas.c3sl.ufpr.br">R-br@listas.c3sl.ufpr.br</a>
<a rel="nofollow" class="yiv2064547879moz-txt-link-freetext" target="_blank" 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 rel="nofollow" class="yiv2064547879moz-txt-link-freetext" target="_blank" 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="yiv2064547879moz-signature">--
======================================================================
Alexandre dos Santos
Proteção Florestal
IFMT - Instituto Federal de Educação, Ciência e Tecnologia de Mato Grosso
Campus Cáceres
Avenida dos Ramires, s/n
Caixa Postal 744
Bairro: Distrito Industrial
Cáceres - MT CEP: 78.200-000
Fone: (+55) 65 8132-8112 (TIM) (+55) 65 9686-6970 (VIVO)
<a rel="nofollow" class="yiv2064547879moz-txt-link-abbreviated" ymailto="mailto:e-mails:alexandresantosbr@yahoo.com.br" target="_blank" href="mailto:e-mails:alexandresantosbr@yahoo.com.br">e-mails:alexandresantosbr@yahoo.com.br</a>
<a rel="nofollow" class="yiv2064547879moz-txt-link-abbreviated" ymailto="mailto:alexandre.santos@cas.ifmt.edu.br" target="_blank" href="mailto:alexandre.santos@cas.ifmt.edu.br">alexandre.santos@cas.ifmt.edu.br</a>
======================================================================
</pre>
</div>
</div><br>_______________________________________________<br>R-br mailing list<br><a rel="nofollow" ymailto="mailto:R-br@listas.c3sl.ufpr.br" target="_blank" href="mailto:R-br@listas.c3sl.ufpr.br">R-br@listas.c3sl.ufpr.br</a><br><a rel="nofollow" target="_blank" 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 rel="nofollow" target="_blank" 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> </div> </div> </blockquote></div> </div></div></div><br>_______________________________________________<br>R-br mailing list<br><a ymailto="mailto:R-br@listas.c3sl.ufpr.br" href="mailto:R-br@listas.c3sl.ufpr.br">R-br@listas.c3sl.ufpr.br</a><br><a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br"
target="_blank">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br>Leia o guia de postagem (<a href="http://www.leg.ufpr.br/r-br-guia" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo reproduzível.<br><br> </div> </div> </div></body></html>