Required Packages and data

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

my_map <- my_map %>%
        addMarkers(lat=51.452437, lng=-0.298503,
                   popup="The Roebuck (Best view for drinking your pint in London)")
my_map