[R-br] RgoogleMaps e rgdal

[Elias T. Krainski]

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


>________________________________
> 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 22:06
>Assunto: Re: [R-br] RgoogleMaps e rgdal
> 
>
> 
>Tentei rodar e veja o 
resultado:
>
>> plotGoogleMaps(x,y)
>Erro: não 
foi possível encontrar a função "plotGoogleMaps"
>
>Veja  se isso serve:
>>
>>
>>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(RgoogleMaps)
>>plotGoogleMaps(xy)
>>
>>
>>Att.
>>Elias  T. Krainski
>>
>>
>>>________________________________
>>> De: Mauricio Cardeal <mcardeal2010 em gmail.com>
>>>Para: r-br em listas.c3sl.ufpr.br 
>>>Enviadas: Terça-feira, 4  de Setembro de 2012 15:36
>>>Assunto: [R-br] RgoogleMaps e  rgdal
>>>
>>>
>>>Olá caros mestRes ! Estou reenviando essa mensagem  porque não tenho certeza de que ela chegou à lista, 
>>>uma vez que não 
    recebi no meu email a notificação. 
>>>
>>>Estou tentando plotar alguns 
    pontos (latitude e longitude) no mapa de Monte Santo, Bahia, 
>>>para uma 
    pesquisa em genética médica, através 
>>>do Rgoogle e rgdal, mas o mapa que 
    aparece ao final não é o de Monte Santo, 
>>>apesar de as coordenadas 
    estarem de acordo com as de Monte Santo. 
>>>O código não apresenta erro, 
    mas o resultado não está certo. 
>>>
>>>Uso o Ubuntu 12.04, o R 2.15.1 e o 
    ESS/Emacs. 
>>>
>>>O que estou fazendo errado ? Segue o CMR: 
>>>
>>>#bibliotecas 
>>>library(RgoogleMaps) 
>>>library(rgdal) 
>>>
>>>#dados de latitude 
>>>bdlt <- 
    c(-43.565,-43.564,-43.563,-43.565,-43.564) 
>>>#dados de longitude 
>>>bdlg 
    <- c(-10.518,-10.466,-10.412,-10.516,-10.474) 
>>>dados <- 
    as.data.frame(cbind(bdlt,bdlg)) 
>>>names(dados) <- c("lat","lon") 
>>>attach(dados,warn.conflicts=F) 
>>>dados 
>>>
>>>dados$size <- "tiny" 
>>>dados$col <- "red" 
>>>dados$char <- "" 
>>>#get the bounding box: 
>>>bb <- qbbox(lat = dados[,"lat"], lon = dados[,"lon"]) 
>>>
>>>#download the map: 
>>>mapa <- GetMap.bbox(bb$lonR, bb$latR, 
    destfile = "dados.png", GRAYSCALE =F, 
>>>markers = dados); 
>>>
>>>#determine the max zoom, so that all points fit on the plot 
>>>zoom 
    <- min(MaxZoom(latrange=bb$latR,lonrange=bb$lonR)); 
>>>plot.new() 
>>>PlotOnStaticMap(mapa,lat = dados[,"lat"], lon = dados[,"lon"], 
>>>                       
    cex=1.5,pch=20,col=c('blue', 'green', 'red'),add=F); 
>>>
>>>Agradeço a 
    ajuda, 
>>>
>>>Mauricio Cardeal 
>>>Complexo Hospitalar Universitário Prof. 
    Edgard Santos
>>>Pós-graduação Processos Interativos dos Órgãos e 
    Sistemas
>>>Instituto de Ciências da Saúde
>>>Universidade Federal da 
    Bahia
>>>
>
>
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20120904/f54c9f4d/attachment.html>