library(leaflet) my_map <- leaflet() %>% addTiles() %>% addMarkers(lat=41.021168, lng=29.004250, popup = "Istanbul Maiden's Tower") my_map