R Markdown and Leaflet

library(leaflet)

my_map <- leaflet() %>%
addTiles() %>%
addMarkers(lat=-33.865143, lng= 151.209900,
popup="I want to visit this place")
my_map