Peer-graded Assignment: R Markdown and Leaflet

my_map <- leaflet() %>% addTiles() 
my_map <- my_map %>% addMarkers(lat=25.197525, lng=55.274288, popup = "Burj Khalifa Dubai")
my_map