Markdown and Leaflet peer-graded assignment

Markdown and Leaflet

The “Ponte di Rialto” in Venice (Italy):

library(leaflet)
m <- leaflet()
m <- addTiles(m)
m <- addCircleMarkers(m, color="red", 
                      lng=12.335929870605469,
                      lat=45.437971909134696, 
                      popup="Ponte di Rialto")
m