Developing Data products - leaflet

library(leaflet)
leaflet() %>%
  addTiles() %>%
  addMarkers(lng = 72.9, lat = 17.98, popup = "My location")