Create a leaflet map object.
library(leaflet)
map <- leaflet() %>% addTiles()
tajmahalIcon <- makeIcon(
iconUrl = "https://png.pngtree.com/png-clipart/20190520/original/pngtree-travel-and-destination-taj-mahal-icon-with-outline-style-png-image_3993275.jpg",
iconWidth = 30*408/255, iconHeight = 30,
iconAnchorX = 30*408/255/2, iconAnchorY = 30/2
)
map %>%
addTiles() %>%
addMarkers(lat=27.1750151, lng=78.0421552,popup='Taj Mahal',icon=tajmahalIcon)