library(leaflet) library(leaflet.extras) leaf <- leaflet() %>% addTiles() leaf %>% addPulseMarkers( lng=-58.81127, lat=-27.52452, label='Pulso', icon = makePulseIcon())