## ------------------------------------------------
## Method `metaRangeEnvironment$new`
## ------------------------------------------------
# Note: Only for illustration purposes.
env <- metaRangeEnvironment$new(sourceSDS = terra::sds(terra::rast(vals = 1, nrow = 2, ncol = 2)))
env
## ------------------------------------------------
## Method `metaRangeEnvironment$set_current`
## ------------------------------------------------
# Only for illustration purposes.
sim_env <- terra::sds(terra::rast(vals = 1, nrow = 2, ncol = 2, nlyr = 2))
names(sim_env) <- "env_01"
env <- metaRangeEnvironment$new(sourceSDS = sim_env)
env$set_current(layer = 1)
## ------------------------------------------------
## Method `metaRangeEnvironment$print`
## ------------------------------------------------
env <- metaRangeEnvironment$new(
sourceSDS = terra::sds(terra::rast(vals = 1, nrow = 2, ncol = 2, nlyr = 2))
)
env$print()
Run the code above in your browser using DataLab