Function which returns the tile IDs of the Sentinel-2 tiles which overlap a provided extent.
tiles_intersects(extent, all = FALSE, out_format = "id", .s2tiles = NULL)
logical: if TRUE, all the tiles overlapping the extent are provided; if FALSE (default), unnecessary tiles are skipped. Unnecessary tiles are tiles which overlaps the extent for an area already coveder by another tile. In case the extent is all included in an overlapping area, only one of the two candidate tiles is returned (the first in alphabetical order).
character: if "sf", the spatial object of the overlapping tiles is returned; if "id" (default), a character vector with the tile IDs.
the tiles intersecting the extent (see argument
License: GPL 3.0
ex_extent <- sf::st_read( system.file("extdata/example_files/scalve.kml", package="sen2r"), quiet = TRUE ) ex_extent <- ex_extent[ex_extent$description == "Schilpario",] # Tile ID of the required S2 tile tiles_intersects(ex_extent)#>#>  "32TNS"# Tile ID of all the overlapping S2 tiles tiles_intersects(ex_extent, all = TRUE)#>  "32TNR" "32TNS"# Spatial object with the required tile sel_tiles <- tiles_intersects(ex_extent, out_format = "sf") plot(sf::st_geometry(sel_tiles)); plot(sf::st_geometry(ex_extent), add=TRUE, col="yellow")# Spatial object with the overlapping S2 tiles sel_tiles <- tiles_intersects(ex_extent, all = TRUE, out_format = "sf") plot(sf::st_geometry(sel_tiles)); plot(sf::st_geometry(ex_extent), add=TRUE, col="yellow")