Untitled

My First Leaflet Map

Create a leaflet map object.

library(leaflet)
map <- leaflet() %>% addTiles()
map

Create a marker with a icon of Pune and a link to its map.

here <- makeIcon(
   iconUrl = "https://image.shutterstock.com/image-vector/historical-icon-pune-city-shaniwar-260nw-1124491562.jpg",
   iconWidth = 31*215/230, iconHeight = 31,
   iconAnchorX = 31*215/230/2, iconAnchorY = 16
)
site<-c("<a href='https://pune.gov.in/about-pune/map-of-district/'>Visit Pune</a>")

leaflet()%>%
   addTiles() %>%
   addMarkers(lat=18.5204,lng=73.8567,popup = site,icon = here)