Created
March 2, 2017 00:31
-
-
Save Mikuana/51ed2e5f1ab04783884e6af94ecb7262 to your computer and use it in GitHub Desktop.
Remove all user installed packages from R
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
# Shamlessly stolen from: | |
# https://www.r-bloggers.com/how-to-remove-all-user-installed-packages-in-r/ | |
# create a list of all installed packages | |
ip <- as.data.frame(installed.packages()) | |
head(ip) | |
# if you use MRO, make sure that no packages in this library will be removed | |
ip <- subset(ip, !grepl("MRO", ip$LibPath)) | |
# we don't want to remove base or recommended packages either\ | |
ip <- ip[!(ip[,"Priority"] %in% c("base", "recommended")),] | |
# determine the library where the packages are installed | |
path.lib <- unique(ip$LibPath) | |
# create a vector with all the names of the packages you want to remove | |
pkgs.to.remove <- ip[,1] | |
head(pkgs.to.remove) | |
# remove the packages | |
sapply(pkgs.to.remove, remove.packages, lib = path.lib) | |
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment
Thank you!