if (FALSE) {
library(antaresRead)
library(antaresEditObject)
# simulation path
setSimulationPath(
path = "pat/to/simulation",
simulation = "input"
)
# Create a scenario builder matrix
sbuilder <- scenarioBuilder(
n_scenario = 51,
n_mc = 2040,
areas_rand = c("fr", "be")
)
sbuilder[, 1:6]
dim(sbuilder)
# Create a scenario builder matrix for hydro levels (use case 1)
sbuilder <- scenarioBuilder(
n_mc = opts$parameters$general$nbyears,
areas = c("fr", "be"),
coef_hydro_levels = c(0.1, 0.9)
)
# Create a scenario builder matrix for hydro levels (use case 2)
sbuilder <- scenarioBuilder(
n_mc = opts$parameters$general$nbyears,
areas = c("fr", "be"),
coef_hydro_levels = c(runif(opts$parameters$general$nbyears)
, runif(opts$parameters$general$nbyears)
)
)
# Read previous scenario builder
# in a matrix format
prev_sb <- readScenarioBuilder()
# Update scenario builder
# Single matrix for load serie
updateScenarioBuilder(ldata = sbuilder, series = "load") # can be l instead of load
# equivalent as
updateScenarioBuilder(ldata = list(l = sbuilder))
# update several series
# same input
sbuilder
updateScenarioBuilder(
ldata = sbuilder,
series = c("load", "hydro", "solar")
)
# List of matrix
updateScenarioBuilder(ldata = list(
l = load_sb,
h = hydro_sb,
s = solar_sb
))
# Deduplicate scenario builder
deduplicateScenarioBuilder()
}
Run the code above in your browser using DataLab