Nothing
unload <- function(project = NULL, quiet = FALSE) {
project <- renv_project_resolve(project)
renv_scope_error_handler()
if (renv_tests_running())
return()
if (quiet)
renv_scope_options(renv.verbose = FALSE)
renv_envvars_restore()
renv_unload_shims(project)
renv_unload_project(project)
renv_unload_profile(project)
renv_unload_envvars(project)
renv_unload_sandbox(project)
renv_unload_libpaths(project)
}
renv_unload_shims <- function(project) {
renv_shims_deactivate()
}
renv_unload_project <- function(project) {
renv_project_clear()
}
renv_unload_profile <- function(project) {
Sys.unsetenv("RENV_PROFILE")
}
renv_unload_envvars <- function(project) {
renv_envvars_restore()
}
renv_unload_sandbox <- function(project) {
renv_sandbox_deactivate()
}
renv_unload_libpaths <- function(project) {
renv_libpaths_restore()
}
renv_unload_finalizer <- function(libpath) {
libpath <- dirname(renv_namespace_path(.packageName))
.onUnload(libpath)
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.