Exercise

library(leaflet) my_map <- leaflet () %>% addTiles() %>% addMarkers(lat=-1.308390, lng=103.759760, popup=“Population explosion”)