Skip to content

Commit

Permalink
clean commented lines
Browse files Browse the repository at this point in the history
  • Loading branch information
lamonica-d committed Oct 27, 2023
1 parent fcb0acf commit 0284bc5
Showing 1 changed file with 0 additions and 7 deletions.
7 changes: 0 additions & 7 deletions R/get_chelsa_future.R
Original file line number Diff line number Diff line change
Expand Up @@ -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"),
Expand Down

0 comments on commit 0284bc5

Please sign in to comment.