Four Beaches of the Normandy Invasion

library(leaflet)

## Warning: package 'leaflet' was built under R version 3.4.1

library(plyr)
library(dplyr)

beachesLatLong <- data.frame(
        lat = c(49.423, 49.3697, 49.3333, 49.31), 
        lng = c(-1.1819, -0.8711, -0.5333, -0.3286)
)

beachesLatLong %>%
        leaflet() %>%
        addTiles() %>%
        addMarkers(popup = c(
                "Utah Beach",
                "Omaha Beach",
                "Gold Beach",
                "Sword Beach"
        ))