library(leaflet)

moscuMarker <- makeIcon(
  iconUrl = "https://image.flaticon.com/icons/svg/861/861539.svg",
  iconWidth = 48*215/230, iconHeight = 31,
  iconAnchorX = 48*215/230/2, iconAnchorY = 16
)

first_map <- leaflet() %>%
  addTiles() %>%
  addMarkers(lat =  55.7522202, lng = 37.6155586, popup = "Moscova", icon = moscuMarker)

first_map

print("Icons made by Freepik from https://www.flaticon.es/ is licensed by Creative Commons BY 3.0")

## [1] "Icons made by Freepik from https://www.flaticon.es/ is licensed by Creative Commons BY 3.0"