data-raw/webservices_table/R/packages.R

reqins_pkg <- function(pkg){
  x <- require(pkg, character.only = TRUE, quietly = TRUE)
  if(!x){
    install.packages(pkg)
    require(pkg, character.only = TRUE, quietly = TRUE)
  }
}
# devtools::install_github(repo = "haozhu233/kableExtra")
pkgs <- c("drake", "knitr", "kableExtra", "magrittr", "magick", "dplyr")
x <- lapply(pkgs, reqins_pkg)
if(!all(unlist(lapply(x, is.null)))){
  print("Some packages could not be loaded")
}
phylotastic/rphylotastic documentation built on Aug. 22, 2023, 9:51 p.m.