library(leaflet)
## Warning: package 'leaflet' was built under R version 3.5.1
Karnak<- leaflet()%>%
addTiles()
Karnak
## poping up a link to know more about the site
KarnakTemple <- c("<a href= 'https://en.wikipedia.org/wiki/Karnak' >Karnak</a>")
leaflet() %>%
addTiles() %>%
addMarkers(lat=25.7188, lng=32.6573, popup = KarnakTemple)