erase_non_functions {eponge}

Remove all the objects, that are not functions

Description

Remove all the objects, that are not functions

Usage

erase_non_functions(pattern = NULL, envir = parent.frame(),
  verbose = FALSE)

Arguments

pattern

regex pattern to select a set of objects; default: NULL

envir

environment; default: caller environment

verbose

print removed objects' names

Details

Function can be used with envir = globalenv() argument.

Value

NULL (function returns nothing)

Examples

cars.2 <- cars
test_fun <- function(x) x + 2
value <- 7
erase_non_functions(verbose = TRUE)