install arbitrary packages from command line

install.R

#!/usr/bin/Rscript
# Rscript install.R packageName
# point of this is to be able to install arbitrary packages from CRAN, github, bioconductor, etc from command line
# used for my remote server where I use the root library to share packages between my user and the shiny user
# sudo install.R glue oganm/ogbox bioc::3.6/affy

library(dplyr)
library(ogbox)

print(.libPaths())

userID = Sys.getenv('USER')

# print(userID)

if(userID == 'root'){
    print('Installing to root library')
    lib =  "/usr/local/lib/R/site-library"
} else{
    print('Installing to user library')
    lib = .libPaths()[1]
}

args <- commandArgs(trailingOnly = TRUE)

args %>% sapply(function(x){
    ogbox::generic_install(x,lib = lib)
})