library(leaflet)
## Warning: package 'leaflet' was built under R version 3.6.2
df <- data.frame(lat = runif(20, min = 39.94, max = 41.97),
lng = runif(20, min = -83, max = -82))
df %>%
leaflet() %>%
addTiles() %>%
addCircleMarkers()