raw_dir <- system.file("extdata/rasters_raw", package = "TemporalModelR")
ref <- file.path(raw_dir, "elevation.tif")
out_dir <- file.path(tempdir(), "aligned")
raster_align(
input_dir = raw_dir,
output_dir = out_dir,
reference_raster = ref,
overwrite = TRUE,
verbose = FALSE
)
Run the code above in your browser using DataLab