library(leaflet) library(dplyr) my_map <- leaflet() %>% addTiles %>% addMarkers(lat = 1.4417, lng = 103.8277, popup = "<a href = 'https://thecommodorecondo.sg/'> The Commodore </a>") my_map