# Load required libraries
library(leaflet)

Sun Jul 29 10:22:57 2018

leaflet() %>% 
  addProviderTiles(providers$OpenStreetMap) %>%
  addTiles() %>%
  addMarkers(lat = 1.3644, lng = 103.9915, popup = "Singapore Changi Airport")