library(leaflet)
my_map<-leaflet() %>%
  addTiles()%>%
  addMarkers(lat=7.858829898 , lng=125.050499798,
             popup="CMU")
my_map