library(leaflet)

leaflet() %>% 
  addProviderTiles(provider = "Esri") %>% 
  setView(lng = -40.2, lat=35.6, zoom = 2)