Devoloping Data product Project

library(leaflet)

my_map=leaflet()%>%addTiles()
my_map=my_map%>%addMarkers(lat = 29.843035,lng = 78.678321,popup="Home")
my_map=my_map%>%addMarkers(lat = 28.498277,lng = 77.018755,popup="Office")
my_map