SlovakiaMaps

Marked cities are regional centers for Slovakia. Information also includes number of residents and webpage for city.

df <- data.frame(lat = c(48.0838, 48.2240, 48.1825, 48.5339, 49.1322, 48.4419, 49.0000, 48.4312),
                 lng = c(17.0635, 17.3510, 18.0511, 18.0226, 18.4424, 19.0925, 21.1400, 21.1529))

popups <- c("Bratislava <br> Number of residents: 413 192 <br> webpage: https://bratislava.sk", "Trnava <br> Number of residents: 66 219 <br> webpage: https://www.trnava.sk", "Nitra <br> Number of residents: 78 875 <br> webpage: https://www.nitra.sk/", "Trenčín <br> Number of residents: 55 883 <br> webpage: https://trencin.sk/", "Žilina <br> Number of residents: 81 382  <br> webpage: https://www.zilina.sk/", "Banská Bystrica <br> Number of residents: 79 583 <br> webpage: https://www.banskabystrica.sk/", "Prešov <br> Number of residents: 88 464 <br> webpage: https://www.presov.sk/", "Košice <br> Number of residents: 233 886 <br> webpage: https://www.kosice.sk/sk")

df %>% 
  leaflet() %>%
  addTiles() %>%
  addMarkers(popup = popups)