R/srtm.R

In AustralianAntarcticDivision/raadtools: Tools for Synoptic Environmental Spatial Data

#' Read a single SRTM tile
#' 
#' Read a tile by x and y index. 
#' 
#' See [raadfiles::srtm_files()] for filename in `fullname` and `x`, `y` for tile indices. 
#' @keywords internal
read_srtm_tile <- function(tile_x = 39, tile_y = 6) {
  files <- raadfiles::srtm_files()
  raster::brick(dplyr::filter(files, x == tile_x, y == tile_y)$fullname[1])
}