Skip to content

Instantly share code, notes, and snippets.

@bfatemi
Created August 15, 2019 17:06
Show Gist options
  • Save bfatemi/d5346b69b89f3323e727e07fa05cf2bd to your computer and use it in GitHub Desktop.
Save bfatemi/d5346b69b89f3323e727e07fa05cf2bd to your computer and use it in GitHub Desktop.
# fun names- c("f")
obj <- unlist(stringr::str_extract_all(
ls(envir = .GlobalEnv, all.names = TRUE),
pattern = paste0(pat, "+_?"),
simplify = FALSE
))
obj[sapply(obj, function(i) rlang::is_callable(get(i)))]
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment