###This is the assignment for demonsration of RMarkdown and Leaflet Hence the file is created, we used the leaflet library as mentioned below

library(leaflet)
## Warning: package 'leaflet' was built under R version 3.6.3

While using the leaflet function, I prefered to mark the Location of TajMahal, the Sevent wonder of the world. Using the popup function we use the marker for showing the seventh wonder of the world

my_map <- leaflet() %>%
  addTiles() %>%  
  addMarkers(lng=78.042019, lat=27.175201, popup="Taj Mahal-The Seventh wonder of the World")
my_map