if (FALSE) {
# Specify file path and name of new SsimLibrary
myLibraryName <- file.path(tempdir(), "testlib")
# Set up a SyncroSim Session, SsimLibrary, Project, and Scenario
mySession <- session()
myLibrary <- ssimLibrary(name = myLibraryName, session = mySession)
myProject <- project(myLibrary, project = "Definitions")
myScenario <- scenario(myProject, scenario = "My Scenario")
# Retrieve the owner of an SsimObject
owner(myLibrary)
owner(myProject)
owner(myScenario)
# Set the owner of a SyncroSim Scenario
owner(myScenario) <- "Apex RMS"
}
Run the code above in your browser using DataLab