August 12, 2017
library(leaflet)
## Warning: package 'leaflet' was built under R version 4.0.2
new_icon <- awesomeIcons(
icon = 'ios-close',
iconColor = 'black',
library = 'ion',
markerColor = "red"
)
content <- paste(sep = "<br/>",
"<b>Alliance university</b>",
"chandapura anekal road road",
"bengaluru, 562106"
)
my_map <- leaflet() %>%
addTiles() %>%
addAwesomeMarkers(lat = 12.7293942, lng = 77.70711,
icon = new_icon,
popup = "Good Coffee at the local CCD") %>%
addPopups(lat = 12.7293942, lng = 77.70711, content,
options = popupOptions(closeButton = FALSE)
)
my_map