A very simple leaflet example, created on April 5, 2019

A place in Italy Iā€™d like to visit within the next 5 years:

library(leaflet)
my_map <- leaflet() %>% addTiles() %>%
                        addMarkers(lat= 40.750, lng= 14.486111, popup= "Ancient Pompei")
my_map