Interactive Map Project

library(leaflet) my_map <- leaflet() %>% addTiles() %>% addMarkers(lat=37.7749, lng=-122.4194, popup=“San Francisco”) my_map