library(leaflet)
m <- leaflet() %>%
  addTiles() %>%  # Add default OpenStreetMap map tiles
  addMarkers(lat=13.3490, lng=74.7856, popup="Manipal")
m  # Print the map