As an exercise, in the following map I represented the metro stations of the first line in the Santiago Metro. I used the metro icon and linked each marker with the official site in order to find aditional information about the station.
metro_file = "metro.csv"
library(leaflet)## Warning: package 'leaflet' was built under R version 4.0.5metro_data <- read.csv(metro_file, sep=";")
metro_icon <- makeIcon(iconUrl = "https://upload.wikimedia.org/wikipedia/commons/6/61/Santiago_Metro_logo.png", iconWidth = 31, iconHeight = 31)
metro <- leaflet() %>% addTiles() %>% addMarkers(lat=metro_data$Latitud, lng=metro_data$Longitud, icon = metro_icon, popup = metro_data$Sitio)
metro