myMap <- leaflet() %>% addTiles() %>% addMarkers(lat = 44.977100, lng = -93.266518,
popup = 'Metropolitan State University, Minneapolis Campus')
myMap %>% addMarkers(lat = 44.9572069, lng = -93.0742816, popup = 'Metropolitan State University, St. Paul Campus' )