#' @title Easy load operator for packages
#' @description load_pkg Loads a list of packages. If a package requires installation, the function will install it from CRAN.
#' @param packagelist Vector of packages to load into R
#' @examples load_pkg(c("ggplot2", "dplyr"))
#' @return Packages loaded into R
#' @export
load_pkg <- function(packagelist) {
# Check if any package needs installation:
PackagesNeedingInstall <- packagelist[!(packagelist %in% installed.packages()[,"Package"])]
if(length(PackagesNeedingInstall))
{
cat("\nInstalling necesarry packages: ", paste0(PackagesNeedingInstall,collapse = ", "), "\n")
install.packages(PackagesNeedingInstall, dependencies = T, repos = "http://cran-mirror.cs.uu.nl/")
}
# load packages into R:
x <- lapply(packagelist, require, character.only = TRUE, quietly = T)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.