1. require(rCharts)
  2. map1 = Leaflet$new()
  3. map1$setView(45.5236, -122.675, 4)
  4. map1$tileLayer("//a.tiles.mapbox.com/v3/mapbox.control-room/{z}/{x}/{y}.png", 8)
  5. map1