R/load_suggest.R

In schifferl/assignment2: CUNY GSPHHP BIOS 621 Assignment 2

#' @importFrom utils install.packages
#' @keywords internal
load_suggests <- function() {
  read.dcf("DESCRIPTION", "Suggests") %>%
    gsub("\n", "", .) %>%
    strsplit(., ",") %>%
    unlist() %>%
    for (i in .) {
      if(!require(i, character.only = TRUE)) {
        install.packages(i)
        require(i, character.only = TRUE)
      }
    }
}