<html><body><div style="color:#000; background-color:#fff; 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 size="2"
 face="Arial"> <hr size="1">  <b><span style="font-weight:bold;">De:</span></b> Mauro Sznelwar <sznelwar@uol.com.br><br> <b><span style="font-weight: bold;">Para:</span></b> Elias T. Krainski <eliaskrainski@yahoo.com.br> <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><meta http-equiv="x-dns-prefetch-control" content="off"><div id="yiv1228887276">

 
 
<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><font size="2" face="Arial"></font><font size="2" face="Arial"></font><font size="2" face="Arial"></font><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><meta http-equiv="x-dns-prefetch-control" content="on"><br><br> </div> </div> </blockquote></div>   </div></body></html>