This is an assignment for Course of R Markdown and Leaflet. In this project, a map was created.
library(leaflet)
my_map <- leaflet() %>%
addTiles()
my_map <- my_map %>%
addMarkers(lat=32.230259, lng=-110.953610,
popup="The University of Arizona")
my_map