Add the leaflet library

library(leaflet)
## Warning: package 'leaflet' was built under R version 3.4.4

Note that you need to scroll the screen to make sure it display properly

m <- leaflet()
m %>%
  addProviderTiles(providers$OpenStreetMap) %>%
  addMarkers(m, lng=113, lat=23, popup="Center of Guangzhou City") %>%
  addMiniMap()