From 0284bc58699631fa017ce6c391fa62dc217c7034 Mon Sep 17 00:00:00 2001 From: lamonica-d Date: Fri, 27 Oct 2023 16:55:13 +0200 Subject: [PATCH] clean commented lines --- R/get_chelsa_future.R | 7 ------- 1 file changed, 7 deletions(-) diff --git a/R/get_chelsa_future.R b/R/get_chelsa_future.R index 0cc9ecc..a134273 100644 --- a/R/get_chelsa_future.R +++ b/R/get_chelsa_future.R @@ -235,13 +235,6 @@ get_chelsa_future <- function(extent_latlon, extent_proj, EPSG, paste0(c("tasmin","tasmax","tas","pr", "bio"), "_res.tif")) r <- terra::rast(files.tif) - - # r <- c(stars::read_stars(files.tif[1]), stars::read_stars(files.tif[2]), - # stars::read_stars(files.tif[3]), stars::read_stars(files.tif[4]), - # stars::read_stars(files.tif[5]), along = "band") - # stars::write_stars(obj = r, options = c("COMPRESS=LZW","PREDICTOR=2"), NA_value = nodat, - # type = "Int16", dsn = file.path(destination, "data_raw","future_chelsa", paste('climat', phase, model, 'ssp', SSP, sep = '_'), "clim_res.tif")) - terra::writeRaster(x = r, overwrite = TRUE, filename = file.path(destination, "data_raw","future_chelsa", paste('climat', phase, model, 'ssp', SSP, sep = '_'), "clim_res.tif"),