Interactive Webpage Map

library(leaflet)
disney.icon = makeIcon(iconUrl = "./aa.jpg", iconWidth = 80, iconHeight = 70, iconAnchorX = 15 , iconAnchorY = 5)

nmy.map=data.frame(
        lat = 34.05575939196097, lng=-118.24997826130456)

disney.site = "<a href='https://en.wikipedia.org/wiki/Walt_Disney_Concert_Hall'>My Walt Disney Concert Hall webpage feature</a"

nmy.map %>% leaflet() %>% addTiles() %>% addMarkers(icon = disney.icon, popup = disney.site)