Skip to content

Instantly share code, notes, and snippets.

@bradlindblad
Last active March 4, 2019 16:29
Show Gist options
  • Save bradlindblad/e287b71ba3ee171c7ba3c7d7ec5c59ce to your computer and use it in GitHub Desktop.
Save bradlindblad/e287b71ba3ee171c7ba3c7d7ec5c59ce to your computer and use it in GitHub Desktop.
plot_polygons_and_branches
library(leaflet)
leaflet() %>%
addTiles() %>%
addPolygons(data = ketchR::footprint_poly()) %>%
addCircles(data = branches,
lat = branches$lat,
lng = branches$lon,
radius = 40000,
stroke = F,
color = "red")
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment