if (FALSE) {
# Make sure packages are installed
addPackage("stsim")
addPackage("stsimsf")
# Create or open a SsimLibrary using the default Session
myLibrary <- ssimLibrary(name = file.path(tempdir(), "mylib"))
# Create SsimLibrary using a specific Session
mySession <- session()
myLibrary <- ssimLibrary(name = file.path(tempdir(), "mylib"),
session = mySession)
# Retrieve SsimLibrary properties
session(myLibrary)
# Load a SsimLibrary with addon package
myLibrary <- ssimLibrary(name = file.path(tempdir(), "mylib"),
overwrite = TRUE, package = "stsim",
addon = "stsimsf")
# Create SsimLibrary from template
addPackage("helloworldSpatial")
mySession <- session()
myLibrary <- ssimLibrary(name = file.path(tempdir(), "mylib"),
session = mySession,
package = "helloworldSpatial",
template = "example-library",
overwrite = TRUE,
forceUpdate = TRUE)
}
Run the code above in your browser using DataLab