library(leaflet)
## Warning: package 'leaflet' was built under R version 3.6.3
new_icon <- awesomeIcons(
  icon = 'ios-close',
  iconColor = 'black',
  library = 'ion',
  markerColor = "yellow"
)

content <- paste(sep = "<br/>",
  "<b>IIM Shillong</b>",
  "Nongthymmai",
  "Shillong, 793014"
)

my_map <- leaflet() %>%
    addTiles() %>%
    addAwesomeMarkers(lat = 25.559108, lng = 91.904229,
        icon = new_icon,
        popup = "One of the premier B-Schools in India") %>%
    addPopups(lat = 25.559108, lng = 91.904229, content,
        options = popupOptions(closeButton = FALSE)
    )
my_map