R/ilpkgs.R

In sialbi/important: Package to calculate the square of a number and the mode of a vector

# ipak function: install and load multiple R packages.
# check to see if packages are installed. Install them
# if they are not, then load them into the R session.

ilpkgs <- function(pkg){
  new.pkg <- pkg[!(pkg %in% installed.packages()[, "Package"])]
  if (length(new.pkg)) 
    install.packages(new.pkg, dependencies = TRUE)
  sapply(pkg, require, character.only = TRUE)
}