<div>Caros, recorro novamente a ajuda de vocês.</div><div>Gostaria utilizar a funcão geocode() para obter as cordenadas (lon, lat) de muitos endereços. Assim pensei em entrar com os dados de endereço e fazer com que o R dispare essa função para cada endereço da planilha. O problema é como fazer para que o resultado seja salvo em colunas respectivamente para cada enderço? Alguém consegue me dar uma dica?</div>

<div><br></div><div><div>> geocode('AVENIDA BRIGADEIRO LUIS ANTONIO, 453')</div><div>        lon       lat</div><div>1 -46.63866 -23.55436</div></div><div><br></div><div>Exemplos de planilhas com endereços</div>

<div><table summary="" id="R9269611968683063" style="font-size:12px;font-family:Arial,Helvetica,Geneva,sans-serif;background-color:rgb(255,255,255)"><tbody><tr><td align="right" style="font-size:12px">   </td></tr><tr><td align="left" class="t15instructiontext" style="font-size:12px">

<div id="report_9269611968683063_catch" style="border:none"><table class="t15standardalternatingrowcolors" cellpadding="0" cellspacing="0" summary="" id="report_R9269611968683063" style="font-size:12px;border:1px solid rgb(207,224,241);border-collapse:collapse">

<tbody><tr><th class="t15header" style="white-space:nowrap;color:rgb(51,102,153);background-color:rgb(207,224,241);padding:2px 5px;border-right-width:1px;border-bottom-width:1px;border-style:none solid solid none;border-right-color:rgb(207,224,241);border-bottom-color:rgb(207,224,241)">

Nr<br></th><th class="t15header" style="white-space:nowrap;color:rgb(51,102,153);background-color:rgb(207,224,241);padding:2px 5px;border-right-width:1px;border-bottom-width:1px;border-style:none solid solid none;border-right-color:rgb(207,224,241);border-bottom-color:rgb(207,224,241)">

Cod Processual <br></th><th class="t15header" style="white-space:nowrap;color:rgb(51,102,153);background-color:rgb(207,224,241);padding:2px 5px;border-right-width:1px;border-bottom-width:1px;border-style:none solid solid none;border-right-color:rgb(207,224,241);border-bottom-color:rgb(207,224,241)">

Endereço</th><th class="t15header" style="white-space:nowrap;color:rgb(51,102,153);background-color:rgb(207,224,241);padding:2px 5px;border-right-width:1px;border-bottom-width:1px;border-style:none solid solid none;border-right-color:rgb(207,224,241);border-bottom-color:rgb(207,224,241)">

CEP</th><th class="t15header" style="white-space:nowrap;color:rgb(51,102,153);background-color:rgb(207,224,241);padding:2px 5px;border-right-width:1px;border-bottom-width:1px;border-style:none solid solid none;border-right-color:rgb(207,224,241);border-bottom-color:rgb(207,224,241)">

Bairro</th><th class="t15header" style="white-space:nowrap;color:rgb(51,102,153);background-color:rgb(207,224,241);padding:2px 5px;border-right-width:1px;border-bottom-width:1px;border-style:none solid solid none;border-right-color:rgb(207,224,241);border-bottom-color:rgb(207,224,241)">

Município Sede</th><th class="t15header" style="white-space:nowrap;color:rgb(51,102,153);background-color:rgb(207,224,241);padding:2px 5px;border-right-width:1px;border-bottom-width:1px;border-style:none solid solid none;border-right-color:rgb(207,224,241);border-bottom-color:rgb(207,224,241)">

UF</th></tr><tr><td class="t15dataalt" align="center" style="font-size:12px;padding:2px 5px;border:1px solid rgb(207,224,241)">1</td><td class="t15dataalt" align="center" style="font-size:12px;padding:2px 5px;border:1px solid rgb(207,224,241)">

26-0001</td><td class="t15dataalt" style="font-size:12px;padding:2px 5px;border:1px solid rgb(207,224,241)">AVENIDA BRIGADEIRO LUIS ANTONIO, 453</td><td class="t15dataalt" align="center" style="font-size:12px;padding:2px 5px;border:1px solid rgb(207,224,241)">

01317000</td><td class="t15dataalt" style="font-size:12px;padding:2px 5px;border:1px solid rgb(207,224,241)">BELA VISTA</td><td class="t15dataalt" style="font-size:12px;padding:2px 5px;border:1px solid rgb(207,224,241)">
SÃO PAULO</td>
<td class="t15dataalt" align="center" style="font-size:12px;padding:2px 5px;border:1px solid rgb(207,224,241)">SP</td></tr><tr><td class="t15data" align="center" style="font-size:12px;padding:2px 5px;background-color:rgb(250,255,255);border:1px solid rgb(207,224,241)">

2</td><td class="t15data" align="center" style="font-size:12px;padding:2px 5px;background-color:rgb(250,255,255);border:1px solid rgb(207,224,241)">26-0002</td><td class="t15data" style="font-size:12px;padding:2px 5px;background-color:rgb(250,255,255);border:1px solid rgb(207,224,241)">

RUA DR. COSTA JÚNIOR, 509</td><td class="t15data" align="center" style="font-size:12px;padding:2px 5px;background-color:rgb(250,255,255);border:1px solid rgb(207,224,241)">05002000</td><td class="t15data" style="font-size:12px;padding:2px 5px;background-color:rgb(250,255,255);border:1px solid rgb(207,224,241)">

AGUA BRANCA</td><td class="t15data" style="font-size:12px;padding:2px 5px;background-color:rgb(250,255,255);border:1px solid rgb(207,224,241)">SÃO PAULO</td><td class="t15data" align="center" style="font-size:12px;padding:2px 5px;background-color:rgb(250,255,255);border:1px solid rgb(207,224,241)">

SP</td></tr><tr><td class="t15dataalt" align="center" style="font-size:12px;padding:2px 5px;border:1px solid rgb(207,224,241)">3</td><td class="t15dataalt" align="center" style="font-size:12px;padding:2px 5px;border:1px solid rgb(207,224,241)">

26-0003</td><td class="t15dataalt" style="font-size:12px;padding:2px 5px;border:1px solid rgb(207,224,241)">AV. DUQUE DE CAXIAS, 193</td><td class="t15dataalt" align="center" style="font-size:12px;padding:2px 5px;border:1px solid rgb(207,224,241)">

01214100</td><td class="t15dataalt" style="font-size:12px;padding:2px 5px;border:1px solid rgb(207,224,241)">SANTA IFIGENIA</td><td class="t15dataalt" style="font-size:12px;padding:2px 5px;border:1px solid rgb(207,224,241)">

SÃO PAULO</td><td class="t15dataalt" align="center" style="font-size:12px;padding:2px 5px;border:1px solid rgb(207,224,241)">SP</td></tr><tr><td class="t15data" align="center" style="font-size:12px;padding:2px 5px;background-color:rgb(250,255,255);border:1px solid rgb(207,224,241)">

4</td><td class="t15data" align="center" style="font-size:12px;padding:2px 5px;background-color:rgb(250,255,255);border:1px solid rgb(207,224,241)">26-0004</td><td class="t15data" style="font-size:12px;padding:2px 5px;background-color:rgb(250,255,255);border:1px solid rgb(207,224,241)">

RUA MADRE DE DEUS, 427</td><td class="t15data" align="center" style="font-size:12px;padding:2px 5px;background-color:rgb(250,255,255);border:1px solid rgb(207,224,241)">03119000</td><td class="t15data" style="font-size:12px;padding:2px 5px;background-color:rgb(250,255,255);border:1px solid rgb(207,224,241)">

MOOCA</td><td class="t15data" style="font-size:12px;padding:2px 5px;background-color:rgb(250,255,255);border:1px solid rgb(207,224,241)">SÃO PAULO</td><td class="t15data" align="center" style="font-size:12px;padding:2px 5px;background-color:rgb(250,255,255);border:1px solid rgb(207,224,241)">

SP</td></tr><tr><td class="t15dataalt" align="center" style="font-size:12px;padding:2px 5px;border:1px solid rgb(207,224,241)">5</td><td class="t15dataalt" align="center" style="font-size:12px;padding:2px 5px;border:1px solid rgb(207,224,241)">

26-0005</td><td class="t15dataalt" style="font-size:12px;padding:2px 5px;border:1px solid rgb(207,224,241)">RUA CLODOMIRO AMAZONAS, 41</td><td class="t15dataalt" align="center" style="font-size:12px;padding:2px 5px;border:1px solid rgb(207,224,241)">

04537010</td><td class="t15dataalt" style="font-size:12px;padding:2px 5px;border:1px solid rgb(207,224,241)">ITAIM BIBI</td><td class="t15dataalt" style="font-size:12px;padding:2px 5px;border:1px solid rgb(207,224,241)">
SÃO PAULO</td>
<td class="t15dataalt" align="center" style="font-size:12px;padding:2px 5px;border:1px solid rgb(207,224,241)">SP</td></tr><tr><td class="t15data" align="center" style="font-size:12px;padding:2px 5px;background-color:rgb(250,255,255);border:1px solid rgb(207,224,241)">

6</td><td class="t15data" align="center" style="font-size:12px;padding:2px 5px;background-color:rgb(250,255,255);border:1px solid rgb(207,224,241)">26-0006</td><td class="t15data" style="font-size:12px;padding:2px 5px;background-color:rgb(250,255,255);border:1px solid rgb(207,224,241)">

RUA LOEFGREEN, 2007</td><td class="t15data" align="center" style="font-size:12px;padding:2px 5px;background-color:rgb(250,255,255);border:1px solid rgb(207,224,241)">04040033</td><td class="t15data" style="font-size:12px;padding:2px 5px;background-color:rgb(250,255,255);border:1px solid rgb(207,224,241)">

VILA CLEMENTINO</td><td class="t15data" style="font-size:12px;padding:2px 5px;background-color:rgb(250,255,255);border:1px solid rgb(207,224,241)">SÃO PAULO</td><td class="t15data" align="center" style="font-size:12px;padding:2px 5px;background-color:rgb(250,255,255);border:1px solid rgb(207,224,241)">

SP</td></tr><tr><td class="t15dataalt" align="center" style="font-size:12px;padding:2px 5px;border:1px solid rgb(207,224,241)">7</td><td class="t15dataalt" align="center" style="font-size:12px;padding:2px 5px;border:1px solid rgb(207,224,241)">

26-0007</td><td class="t15dataalt" style="font-size:12px;padding:2px 5px;border:1px solid rgb(207,224,241)">AV. CELIDONIO NETO, N. 165</td><td class="t15dataalt" align="center" style="font-size:12px;padding:2px 5px;border:1px solid rgb(207,224,241)">

17120000</td><td class="t15dataalt" style="font-size:12px;padding:2px 5px;border:1px solid rgb(207,224,241)">CENTRO</td><td class="t15dataalt" style="font-size:12px;padding:2px 5px;border:1px solid rgb(207,224,241)">AGUDOS</td>

<td class="t15dataalt" align="center" style="font-size:12px;padding:2px 5px;border:1px solid rgb(207,224,241)">SP</td></tr><tr><td class="t15data" align="center" style="font-size:12px;padding:2px 5px;background-color:rgb(207,224,241);border:1px solid rgb(207,224,241)">

8</td><td class="t15data" align="center" style="font-size:12px;padding:2px 5px;background-color:rgb(207,224,241);border:1px solid rgb(207,224,241)">26-0008</td><td class="t15data" style="font-size:12px;padding:2px 5px;background-color:rgb(207,224,241);border:1px solid rgb(207,224,241)">

RUA CAPITÃO MIRANDA 57</td><td class="t15data" align="center" style="font-size:12px;padding:2px 5px;background-color:rgb(207,224,241);border:1px solid rgb(207,224,241)">13900030</td><td class="t15data" style="font-size:12px;padding:2px 5px;background-color:rgb(207,224,241);border:1px solid rgb(207,224,241)">

CENTRO</td><td class="t15data" style="font-size:12px;padding:2px 5px;background-color:rgb(207,224,241);border:1px solid rgb(207,224,241)">AMPARO</td><td class="t15data" align="center" style="font-size:12px;padding:2px 5px;background-color:rgb(207,224,241);border:1px solid rgb(207,224,241)">

SP</td></tr></tbody></table></div></td></tr></tbody></table></div><br>