<div dir="ltr">boa noite, colegas.<div>Gostaria de uma ideia para o seguinte problema:<br><div><br></div><div>Estou buscando as coordenadas de alguns municípios do estado de ES usando o seguinte código:</div><div><br></div><div>library(RgoogleMaps)<br><br>aux_city <- c("Vitória ES","Serra ES","Vila Velha ES","Cariacica ES","Colatina ES")<br>aux_city_coord <- data.frame(Municípios=aux_city, lat=NA, long=NA)<br>aux_city_coord <- with(aux_city_coord,data.frame(Municípios=aux_city_coord$Municípios, <br>  Â  Â  Â  Â  Â  Â  Â  Â  t(sapply(aux_city_coord$Municípios, getGeoCode))))<br>aux_city_coord<br><br>Que retorna essas coordenadas. <br><br>> aux_city_coord<br>  Â  Â Municípios Â  Â  Â  lat Â  Â  Â  Â  lon<br>1 Â  Â Vitória ES Â 42.84651 Â -2.6724025<br>2 Â  Â  Â Serra ES Â 39.68388 Â -0.4288545<br>3 Vila Velha ES -20.32973 -40.2920284<br>4 Â Cariacica ES -20.26320 -40.4165490<br>5 Â  Colatina ES -19.53467 -40.6287836<br><br>Notem que as coordenadas de Vitória e Serra estão totalmente erradas<br>Porém, na tentativa e erro eu descobri que Vitória, não precisada do "ES" e <br>retornou corretamente, mas Serra, sem chances de encontrar.<br><br>aux_city <- c("Vitória","Serra","Serra-ES","Serra.ES")<br>aux_city_coord <- data.frame(Municípios=aux_city, lat=NA, long=NA)<br>aux_city_coord <- with(aux_city_coord,data.frame(Municípios=aux_city_coord$Municípios, <br>  Â  Â  Â  Â  Â  Â  Â  Â  t(sapply(aux_city_coord$Municípios, getGeoCode))))<br>aux_city_coord<br><br>> aux_city_coord<br>  Municípios Â  Â  Â  lat Â  Â  Â  Â  lon<br>1 Â  Â Vitória -20.32009 -40.3376682<br>2 Â  Â  Â Serra Â 43.07201 Â  1.1727739<br>3 Â  Serra-ES Â 39.68388 Â -0.4288545<br>4 Â  Serra.ES Â 39.68388 Â -0.4288545<br><br>Provavelmente poderá acontecer isso com outros municípios.<br>Eu gostaria de saber se existe alguma uma forma de obter/consultar/verificar <br>a grafia correta de, por exemplo, um ou todos <br>os municípios de um determinado estado, sem que tenha que digitar o nome do mesmo.<br>Mas qualquer outra forma de contornar este problema será bem vinda.<br><br>Obrigado<br></div><div>Att</div><div>Flávio</div><div><br></div><div><br></div><div><br></div><div><br></div><div><br></div><div><br></div><div><br></div></div></div>