if (FALSE) {
# Set the file path and name of the new SsimLibrary
myLibraryName <- file.path(tempdir(),"testlib_project")
# Set the SyncroSim Session, SsimLibrary, and Project
mySession <- session()
myLibrary <- ssimLibrary(name = myLibraryName, session = mySession)
myProject <- project(ssimObject = myLibrary, project = "My project name")
myproject2 <- project(ssimObject = myLibrary, project = "My new project name")
# Get a named list of existing Projects
# Each element in the list is named by a character version of the Project ID
myProjects <- project(myLibrary, summary = FALSE)
names(myProjects)
# Get an existing Project.
myProject <- myProjects[[1]]
myProject <- project(myLibrary, project = "My new project name")
# Get/set the Project properties
name(myProject)
name(myProject) <- "New project name"
# Create a new Project from a copy of an existing Project
myNewProject <- project(myLibrary, project = "My copied project",
sourceProject = 1)
# Overwrite an existing Project
myNewProject <- project(myLibrary, project = "My copied project",
overwrite = TRUE)
}
Run the code above in your browser using DataLab