library(leaflet)
map <- leaflet() %>% addTiles()
vangoghicon = makeIcon(iconUrl="http://cdn.onlinewebfonts.com/svg/download_67252.png",
iconWidth = 31, iconHeight = 31)
vangoghpop<-c("<a href='https://www.vangoghmuseum.nl'>Van Gogh Museum</a>")
map %>%
addTiles() %>%
addMarkers(icon=vangoghicon, lat=52.3584159, lng=4.8810756, popup = vangoghpop)