[R-br] RgoogleMaps e rgdal

[Elias T. Krainski]

Lamento postar codigo sem teste... Este agora foi testado e funciona.

### coordenadas dos pontos 
x <- c(-43.565,-43.564,-43.563,-43.565,-43.564)  
y <- c(-10.518,-10.466,-10.412,-10.516,-10.474)  

### monta SpatialPointsDataFrame, como nao ha 
### dados, criado um data.frame com a coluna ID
require(sp)
Pontos <- SpatialPointsDataFrame(SpatialPoints(cbind(x,y)),
  data=data.frame(ID=1:length(x)))

### assumindo uma particular projecao, e'
### necessario verificar se e' mesmo esta
proj4string(Pontos) <- CRS('+proj=longlat +datum=WGS84')

### sobrepoe ao google Maps e visualiza
require(plotGoogleMaps) 
plotGoogleMaps(xyd)

### melhores informacoes ver
vignette("plotGoogleMaps-intro")

 
Elias T. Krainski


>________________________________
> De: Mauro Sznelwar <sznelwar em uol.com.br>
>Para: Elias T. Krainski <eliaskrainski em yahoo.com.br> 
>Enviadas: Terça-feira, 4 de Setembro de 2012 23:03
>Assunto: Re: [R-br] RgoogleMaps e rgdal
> 
>
> 
>Continua não dando certo:
>Creito que tem um erro no  xy <- SpatialPoints(cbind(xy)) que 
deveria ser
>xy <- 
SpatialPoints(cbind(x,y)) 
>E mesmo corrigindo veja o 
acentece:
>> plotGoogleMaps(x,y)
>Erro em function (classes, fdef, 
mtable)  : 
>  unable to find an inherited method for function 
"spTransform", for signature "numeric", "CRS"
>> 
>
>
>
>>
>>Troquei  os pacotes. É necessário o pacote plotGoogleMaps. Corrigindo:
>>
>>y 
  <- c(-43.565,-43.564,-43.563,-43.565,-43.564)  
>>
>>x  <- c(-10.518,-10.466,-10.412,-10.516,-10.474)  
>>
>>
>>require(sp)
>>xy <-  SpatialPoints(cbind(xy))
>>
>>
>>
>>require(plotGoogleMaps) 
>>plotGoogleMaps(xy)
>> 
>>Elias T. Krainski
>>
>> 
>
>
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20120905/fb5a728a/attachment.html>