Martinique

library(leaflet)
my_map <- leaflet() %>% addTiles() 
my_map <- my_map %>% addMarkers(lat=14.6161, lng= -61.0588, popup="My Office")
my_map