R Markdown and Leaflet

library(leaflet)
my_map <- leaflet() %>% 
  addTiles()

my_map <- my_map %>%
  addMarkers(lat=49.266063, lng=-123.256168, 
             popup="Anywhere cool")
my_map