library(shiny) library(leaflet)
my_map <- leaflet() %>% addTiles() my_map <- my_map %>% addMarkers(lat=3.156644, lng= 101.708638, popup="My Home") my_map