library(leaflet) my_map <- leaflet() %>% addTiles() my_map <- my_map %>% addMarkers(lat=41.890251, lng= 12.492373, popup="The Colosseum") my_map