Lamento postar codigo sem teste... Este agora foi testado e funciona.
### coordenadas dos pontosx <- 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 IDrequire(sp)Pontos <- SpatialPointsDataFrame(SpatialPoints(cbind(x,y)),data=data.frame(ID=1:length(x)))
### assumindo uma particular projecao, e'### necessario verificar se e' mesmo estaproj4string(Pontos) <- CRS('+proj=longlat +datum=WGS84')
### sobrepoe ao google Maps e visualizarequire(plotGoogleMaps)plotGoogleMaps(xyd)
### melhores informacoes vervignette("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 serxy <- 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
_______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
-- ====================================================================== 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) e-mails:alexandresantosbr@yahoo.com.br alexandre.santos@cas.ifmt.edu.br ======================================================================