R Markdown and Leaflet

library(leaflet)
my_map <- leaflet() %>%
  addTiles() %>%  
  addMarkers(lng=12.492327, lat=41.890186, popup="Colosseo in Rome")
my_map