library(leaflet)
library(magrittr)
MyMap <- leaflet() %>%
addTiles() %>%
setView(74.7870, 13.3530, zoom = 14) %>%
addMarkers(74.7849, 13.3533, popup = 'MAHE') %>%
addMarkers(74.7873, 13.3529, popup = 'KMC') %>%
addMarkers(74.7928, 13.3525, popup = 'MIT') %>%
addMarkers(74.7856, 13.3429, popup = 'Lake')
MyMap