Untitled

{r setup, include=FALSE} knitr::opts_chunk$set(echo = TRUE)

library(leaflet)
mymap = leaflet()
mymap = addTiles(mymap)
mymap = setView(mymap, lng = -156.05688, lat = 20.67896, zoom =10)
mymap = addMarkers(mymap, lng = -156.05688, lat = 20.67896, popup = "Waterfall worth the long hike")
mymap