Add the leaflet library
library(leaflet)
## Warning: package 'leaflet' was built under R version 3.4.4
m <- leaflet()
m %>%
addProviderTiles(providers$OpenStreetMap) %>%
addMarkers(m, lng=113, lat=23, popup="Center of Guangzhou City") %>%
addMiniMap()