Map

library(leaflet)

LatLong1 <- data.frame(
  lat = c(28.612928, 27.175359, 12.305450, 12.302515, 31.620273, 22.545105, 18.940088, 18.922299, 20.591372, 26.912999, 19.887908, 25.155408),
  lng = c(77.229513, 78.042134, 76.655138, 76.664042, 74.876496, 88.342558, 72.835458, 72.834611, 75.696000, 70.912222, 86.094558, 73.587010))

LatLong2 <- data.frame(
        lat = c(26.031506, 33.718659, 29.530275, 23.722808, 21.137764, 26.595470, 22.334821, 26.659423, 21.835949, 20.248745, 21.763192, 22.503698),
        lng = c(76.504797, 77.388351, 78.774725, 81.024208, 70.823313, 93.170612, 80.611481, 91.000959, 88.884244, 79.360571, 79.339145, 78.435679))

PopUp1 &lt;- c("India Gate, Delhi","Taj Mahal","Mysore Palace","Mysuru Zoo","Harmandir Sahib, Amritsar","Victoria Memorial, Kolkata","Chhatrapati Shivaji Terminus, Mumbai", "Gateway of India, Mumbai", "Ajanta Ellora Caves, Aurangabad", "Jaisalmer Fort, Jaisalmer", "Konark Sun Temple, Konark", "Kumbhalgarh Fort, Rajasthan")

PopUp2 &lt;- c("Ranthambore National Park, Rajasthan", "Hemis National Park, Ladakh", "Jim Corbett, Uttarakhand", "Bandhavgarh National Park, Madhya Pradesh", "Sasan-Gir Wildlife Sanctuary, Gujarat", "Kaziranga National Park, Assam", "Kanha National Park, Madhya Pradesh", "Manas Wildlife Sanctuary, Assam", "Sunderbans National Park, West Bengal", "Tadoba National Park, Maharashtra", "Pench National Park, Madhya Pradesh", "Satpura National Park, Madhya Pradesh")

LatLong1[3] &lt;- PopUp1
LatLong2[3] &lt;- PopUp2
LatLong &lt;- rbind(LatLong1, LatLong2)
names(LatLong) &lt;- c("Latitude", "Longitude", "Place")

LatLong %&gt;% 
  leaflet() %&gt;%
  addTiles() %&gt;%
  addCircleMarkers(popup = LatLong$Place, color = "Blue")