# NOT RUN {
bbox <- get_centroid_bounding_box(c(
"lat" = 44.121268,
"lng" = -73.903734
),
distance = 10
)
overlay_file <- tempfile("overlay_file", fileext = ".png")
get_image_overlay(bbox,
save.png = TRUE,
png.filename = overlay_file,
overlay = "World_Imagery"
)
overlay <- load_overlay(overlay_file)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab