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