# NOT RUN {
map <- CreateWebMap(collapsed = FALSE)
ll <- rbind(c(-112.049705, 43.517810),
c(-122.171257, 37.456526),
c( -77.367458, 38.947206),
c(-149.803565, 61.187905),
c( -80.248344, 26.080860))
map <- leaflet::addMarkers(map, ll[, 1], ll[, 2])
map
# }
Run the code above in your browser using DataLab