Developing Data Products Week 2 Assignment

library(leaflet)
my_map <- leaflet() %>%
  addTiles() %>%
  addMarkers(lat=21.013217,  lng=105.527331, popup = "FPT University")

my_map