R/libraries.R

# install library ----

mypackages <- c("shiny",
                "rlang",
                "here",
                "rio",
                "reactlog",
                "vroom",
                # "tidyverse",
                "shinythemes",
                "dplyr",
                "readxl",
                "survival",
                "survminer",
                "finalfit",
                "reactable",
                "arsenal",
                "glue",
                "shinyFeedback",
                "lubridate",
                "janitor",
                "remotes",
                "shinyWidgets",
                "rintrojs",
                "highcharter",
                "plotly",
                "foreign"
)

# install_pkg <- function(name, ...) {
#   if (!requireNamespace(name, quietly = TRUE)) {
#     install.packages(name, ...)
#   }
# }

# if (!requireNamespace("correlation", quietly = TRUE)) {
# devtools::install_github("easystats/correlation")
#   }

if (!requireNamespace("correlation", quietly = TRUE)) {
renv::install("easystats/correlation")
  }



# if (!requireNamespace("pacman", quietly = TRUE)) {
#   install.packages("pacman")
# }


# if (!requireNamespace("purrr", quietly = TRUE)) {
#   install.packages("purrr")
# }

# purrr::map(.x = mypackages, .f = install_pkg)

# if (!requireNamespace("report", quietly = TRUE)) {
#   remotes::install_github("easystats/report")
# }


# Load Library ----


suppressPackageStartupMessages({
  library("shiny")
  library("rlang")
  library("rio")
  library("reactable")
  library("vroom")
  # library("tidyverse")
  library("shinythemes")
  library("dplyr")
  library("readxl")
  library("survival")
  library("survminer")
  library("finalfit")
  library("arsenal")
  library("glue")
  library("reactlog")
  library("shinyFeedback")
  library("lubridate")
  library("janitor")
  library("correlation")
  library("shinyWidgets")
  library("rintrojs")
  library("highcharter")
  library("plotly")
  library("foreign")
})
sbalci/histopathRshiny documentation built on March 27, 2023, 10:09 a.m.