library(leaflet)
library(leaflet.extras)

leaf <- leaflet() %>% addTiles()

leaf %>%
  addPulseMarkers(
    lng=-58.81127, lat=-27.52452,
    label='Pulso',
    icon = makePulseIcon())