init.R

In jepusto/SingleCaseES: A Calculator for Single-Case Effect Sizes

# init.R
#
# Example R code to install packages if not already installed
#

my_packages = c("shiny", "ggplot2", "markdown", "tidyr", "dplyr", "readxl", 
                "janitor", "rlang", "glue", "rclipboard", "Kendall", "SingleCaseES")

install_if_missing = function(p) {
  if (p %in% rownames(installed.packages()) == FALSE) {
    install.packages(p)
  }
}

invisible(sapply(my_packages, install_if_missing))