leaflet() %>%
  addTiles() %>%  # This adds the default OpenStreetMap tiles
  addMarkers(lng = -20.1241, lat = 64.3272, popup = "Gullfoss Waterfall, Iceland")