Commit 070b4220 authored by majpark21's avatar majpark21

Moved automatic installation of packages into global.R

parent 325456b9
# Check if all required packages are installed, if not attempt to install the missing ones
required_packages = c("shiny", "shinyjs", "shinyBS", "shinycssloaders",
"data.table", "DT", "ggplot2", "gplots", "plotly",
"scales", "grid", "dendextend", "RColorBrewer",
"ggthemes", "sparcl", "dtw", "factoextra", "imputeTS",
"MASS", "robust", "pracma", "Hmisc")
missing_packages <- required_packages[!(required_packages %in% installed.packages()[,"Package"])]
if(length(missing_packages)) install.packages(missing_packages)
source('modules/auxfunc.R')
source('modules/selOutliers.R')
source('modules/downPlot.R')
......
......@@ -5,14 +5,6 @@
# This is the user-interface definition for a Shiny web application.
#
required_packages = c("shiny", "shinyjs", "shinyBS", "shinycssloaders",
"data.table", "DT", "ggplot2", "gplots", "plotly",
"scales", "grid", "dendextend", "RColorBrewer",
"ggthemes", "sparcl", "dtw", "factoextra", "imputeTS",
"MASS", "robust", "pracma", "Hmisc")
missing_packages <- required_packages[!(required_packages %in% installed.packages()[,"Package"])]
if(length(missing_packages)) install.packages(missing_packages)
library(shiny)
library(shinyjs) # http://deanattali.com/shinyjs/
library(shinyBS) # for tooltips
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment