library(leaflet)
library (ggplot2)
my_firstmap <- leaflet() %>%
  addTiles() %>%
addMarkers(lat=48.858053, lng=2.294289, popup = "Paris")

my_firstmap