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@uol.com.br> Para: Elias T. Krainski <eliaskrainski@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