Leaflet - California (USA) map

m = leaflet() %>% 
  setView(lat = 36.778259, lng = -119.417931, zoom = 5) %>%
  addTiles() %>% 
  addMarkers(lat = 36.778259, lng = -119.417931, popup = "California state, USA")
m