library(leaflet) leaflet() %>% addTiles() %>% addMarkers(lat = 13.0827, lng = 80.2707, popup = "Chennai")