[R-br] Coordenadas a partir do CEP

[Henrique Dallazuanna]

O link está errado apontando para uma formatação html, tente assim:

library(XML)
h <- xmlTreeParse(readLines(sprintf("
http://maps.googleapis.com/maps/api/geocode/xml?address=%s&sensor=false",
"80240-000")), useInternalNodes = TRUE)
sapply(sprintf("//geometry//location//%s", c("lat", "lng")), xpathApply,
doc = h, fun = xmlValue)


2013/7/23 Sérgio Henrique almeida da silva ju <sergio.edfisica em gmail.com>

> Prezados
>
> Estou rodando o código abaixo para gerar as coordenadas a partir de um
> CEP, porém esta dando a seguinte mensagem de erro:
>
> Erro: símbolo inesperado in:
> "url_lat_lon <- paste(sprintf("<a href=
> "http"
>
> O que devo alterar para o código rodar?
>
> Abraços
> require(XML)
> coordenadas<- function(cep) {
> url_lat_lon <- paste(sprintf("<a href=
> "http://maps.google.com/maps/api/geocode/xml?address=%s">
> http://maps.google.com/maps/api/geocode/xml?address=%s,",
> cep),"%20Brasil&sensor=false", sep="")
> lat_lon=xmlApply(xmlRoot(xmlTreeParse(
> readLines(url_lat_lon)))[['result']][['geometry']][['location']], "[[", 1)
> return(lat_lon)
>
> --
> Sérgio Henrique Almeida da Silva Junior
> Doutorando em Epidemiologia em Saúde Pública
> Escola Nacional de Saúde Pública Sérgio Arouca - ENSP/FIOCRUZ
> http://lattes.cnpq.br/1611345552843383
> Tel: (21) 68463637
> http://www.linkedin.com/profile/view?id=250437145&trk=tab_pro
>
> _______________________________________________
> R-br mailing list
> R-br em 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.
>



-- 
Henrique Dallazuanna
Curitiba-Paraná-Brasil
25° 25' 40" S 49° 16' 22" O
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20130723/9d1d441c/attachment.html>