Skip to content

Instantly share code, notes, and snippets.

@genomewalker
Created April 19, 2018 09:32
Show Gist options
  • Save genomewalker/4678be4d97aac3771ab11b2216c5764f to your computer and use it in GitHub Desktop.
Save genomewalker/4678be4d97aac3771ab11b2216c5764f to your computer and use it in GitHub Desktop.
detachAllPackages <- function() {
basic.packages <- c("package:stats","package:graphics","package:grDevices","package:utils","package:datasets","package:methods","package:base")
package.list <- search()[ifelse(unlist(gregexpr("package:",search()))==1,TRUE,FALSE)]
package.list <- setdiff(package.list,basic.packages)
if (length(package.list)>0) for (package in package.list) detach(package, character.only=TRUE)
}
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment