exampleRepoDir <- tempfile()
createLocalRepo(repoDir = exampleRepoDir)
data(swiss)
saveToLocalRepo(swiss, repoDir=exampleRepoDir, archiveSessionInfo = TRUE)
showLocalRepo(method = "md5hashes", repoDir = exampleRepoDir)
showLocalRepo(method = "tags", repoDir = exampleRepoDir)
loadFromLocalRepo(md5hash = '2a6e492cb6982f230e48cf46023e2e4f',
repoDir = system.file("graphGallery", package = "archivist"), value = TRUE) -> model
saveToLocalRepo(model, repoDir=exampleRepoDir,
userTags = c("do not delete", "my favourite model"))
aoptions('repoDir', system.file("graphGallery", package = "archivist"))
showLocalRepo(method = "tags")
data(iris)
asave(iris, silent = FALSE) # iris was used in pl
aoptions('repoDir', NULL, unset = TRUE)
deleteLocalRepo(exampleRepoDir, TRUE)
rm(exampleRepoDir)
Run the code above in your browser using DataLab