Interactive map created with Leaflet at: 2017-12-19 16:11:15
Coursera’s Developing Data Products course. Week 2 Assignment.
library(leaflet)
my_map <- leaflet() %>%
setView(lat = 36.4210, lng = -5.1478, zoom = 15) %>%
addTiles() %>%
addMarkers(lat=36.4231, lng=-5.1459,
label="Main Beach (3 km long seafront promenade)") %>%
addMarkers(lat=36.4146, lng=-5.1577,
label="Fishing Port") %>%
addPopups(lat=36.4157, lng=-5.1409,
"Africa is close. This is one of the southernmost villages in Europe.", options = popupOptions(closeButton = FALSE)) %>%
addPopups(lat=36.426, lng=-5.1454,
"Old Town. Charming streets and delicious mediterranean food.", options = popupOptions(closeButton = FALSE))
Learn more about my village on Wikipedia
my_map