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