#' Cleanup function
#'
#' @description Removes all objects except the main data lists generated by \code{\link{start0}}
#'
#' @return
#' @export
#'
#'
cleanUp <- function() {
rm(list = setdiff(objects(pos = .GlobalEnv),
c("info", "dat", "raw.data", "UniProt")), pos = .GlobalEnv)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.