2nd Assignment of ‘Developing Data Products’

Code:

library(leaflet)

## Warning: package 'leaflet' was built under R version 4.3.3

monuments<-data.frame(lat=c(27.1751,31.6200,9.9195,18.9220,28.6562),lng=c(78.0421,74.8765,78.1193,72.8347,77.2410),name=c("Taj Mahal","Golden Temple","Meenakshi Temple","Gateway Of India","Red Fort"))
my_map<-monuments %>% leaflet() %>% addTiles() %>% addMarkers(popup =monuments$name,clusterOptions = markerClusterOptions())

## Assuming "lng" and "lat" are longitude and latitude, respectively

my_map