Indian Cities

Indian Cities

27th December 2017

require(magrittr)
require(leaflet)

ubcIcon <- makeIcon(
  iconUrl = 'https://upload.wikimedia.org/wikipedia/en/thumb/4/41/Flag_of_India.svg/1200px-Flag_of_India.svg.png',
    
  iconWidth = 31*200/230, iconHeight = 31,
  iconAnchorX = 31*200/230/2, iconAnchorY = 16
)

ubclatlng <- data.frame(
  lat = c(28.7041, 19.0760, 12.9716),
  lng = c(77.1025, 72.8777, 77.5946)
)

ubclatlng %>% leaflet() %>% addTiles() %>% addMarkers(icon = ubcIcon, popup = "Cities of India")