<div dir="ltr"><div>Gilbert e colegas, boa tarde!</div><div><br></div><div>Tenho esse trecho de código que pode servir pra testar.</div><div><br></div><div>#install.packages("OpenStreetMap", dep=T)</div><div>#Pacotes exigidos: c("OpenStreetMap", "rJava", "raster", "sp", "rgdal")</div>
<div>require(OpenStreetMap)</div><div><br></div><div>#Dourados-MS</div><div>map1 <- openmap(c(lat=-21.5, lon=-56), c(lat=-23, lon=-54.5), </div><div>                minNumTiles=4, type="esri")</div><div>map2 <- openmap(c(lat=-21.5, lon=-56), c(lat=-23, lon=-54.5), </div>
<div>                minNumTiles=4, type="esri-topo")</div><div>plot(map1)</div><div>plot(map2)</div><div><br></div><div>#opcoes <- c("osm", "maptoolkit-topo", "waze", "mapquest", "mapquest-aerial", </div>
<div>#            "bing", "stamen-toner", "stamen-terrain", "stamen-watercolor",</div><div>#            "osm-german", "osm-wanderreitkarte", "mapbox", "esri", "esri-topo",</div>
<div>#            "nps", "apple-iphoto", "skobbler", "opencyclemap", "osm-transport",</div><div>#            "osm-public-transport", "osm-bbike", "osm-bbike-german")</div>
<div><br></div><div class="gmail_extra">At.te,<br><br>-- <br><div dir="ltr">Éder Comunello <<a href="mailto:comunello.eder@gmail.com" target="_blank">c</a><a href="mailto:omunello.eder@gmail.com" target="_blank">omunello.eder@gmail.com</a>> <br>
Dourados, MS - [22 16.5'S, 54 49'W]<br></div>
</div></div>