Map of CUMC - 5/3/2017

#Map of Columbia University Medical Center

m <- leaflet() %>%
    addTiles() %>%
    setView(-73.9394, 40.8417, zoom = 12) %>%
    addMarkers(lng=-73.9412, lat=40.8411, popup="Columbia University Medical Center")
m