library(leaflet) my_map <- leaflet() %>% addTiles() %>% addMarkers(lat=39.3341961,lng=-82.0893786,popup="KB's home!!!") my_map