if (FALSE) {
# Set the file path and name of the new SsimLibrary
myLibraryName <- file.path(tempdir(),"testlib")
# Set the SyncroSim Session, SsimLibrary, and Project
mySession <- session()
myLibrary <- ssimLibrary(name = myLibraryName, session = mySession)
myProject <- project(myLibrary, project = "My Project")
# Create a new Scenario
myScenario <- scenario(myProject, scenario = "My Scenario")
# Create a new Scenario from an existing Scenario
myScenarioCopy <- scenario(myProject, scenario = "My Scenario Copy",
sourceScenario = myScenario)
# Find all the Scenarios in a SsimLibrary
scenario(myLibrary)
# Only return the results Scenarios for a SsimLibrary
scenario(myLibrary, results = TRUE)
# Overwrite an existing Scenario
myNewScenario <- scenario(myProject, scenario = "My New Scenario",
overwrite = TRUE)
}
Run the code above in your browser using DataLab