R/clear.R

In eonurk/useR: Useful R Scripts

#' Clear global environment
#'
#' Deletes all Global Environment shortcut for rm(list=ls())
#' @param variable cleans the given paramater
#' @param except cleans everything except specified parameters
#' @return None
#'
#' @examples
#' clear() # delete all parameters
#' clear("a") # delete variable a only
#' clear(except = "a") # delete all except variable a
#'
#' @export

clear <- function(variable="",except="", env = .GlobalEnv) {
  if(variable!="")
    rm(list=ls(envir = env)[ls(envir = env)==variable], envir = env)
  else
    rm(list=ls(envir = env)[ls(envir = env)!=except], envir = env)
}