Developing Data Products - R Markdown and Leaflet

library(leaflet)

##printing the map
my_map<-leaflet() %>%
  addTiles() %>%
  addMarkers(lat=42.3770, lng=-71.1167, popup="Harvard University")%>%
  addMarkers(lat=42.3519, lng=-71.0500, popup="Boston Children's Museum")
my_map