if (FALSE) {
extd.dir <- system.file("extdata", package = "pacu")
area.of.interest <- sf::st_read(file.path(extd.dir, 'cobs_a_aoi.shp'), quiet = TRUE)
available.images <- pa_browse_dataspace(aoi = area.of.interest,
max.cloud.cover = 10,
start.date = '2023-01-01',
end.date = '2023-12-31')
}
Run the code above in your browser using DataLab