Leaflet Graph

library(leaflet)

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

library(dplyr)

## 
## Attaching package: 'dplyr'

## The following objects are masked from 'package:stats':
## 
##     filter, lag

## The following objects are masked from 'package:base':
## 
##     intersect, setdiff, setequal, union

set.seed(2016-04-25)
df <- data.frame(lat= runif(100, min = 40.5, max = 49.8), 
                 lng = runif(100, min = 5.5, max = 15.2))
df %>%
  leaflet() %>%
  addTiles() %>%
  addMarkers()