Prezado Thiago,
Se não estou enganado
você consegue as coordendas a partir do CEP, da seguinte
forma:
require(XML)
coordenadas<- function(cep)
{
url_lat_lon <- paste(sprintf("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)
}
cep=36026300
coordenadas(cep)
Obs.:
Existe posts passados abordando estes assunto, lembro que salvei esse script
em alguns desses posts, porém não
me lembro exatamente quem postou,
portanto fica as minhas desculpas pela a falta de
referência.