The LeafLet Map

This is an R Markdown document for the leaflet map assignment. You acn find the map below:

library(leaflet)
map <- leaflet() %>%
  addTiles() %>%  
  setView(-72.690940, 41.651426,zoom=5) %>%
  addMarkers(lng=-72.690940, lat=41.651426, popup="<a href='https://www.google.com'>Take Me To Google</a>")
map