-
Notifications
You must be signed in to change notification settings - Fork 0
/
main.R
33 lines (28 loc) · 1.08 KB
/
main.R
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
#Load necessary packages
if (!'shiny' %in% installed.packages()) install.packages("shiny")
library(shiny)
if (!'shinydashboard' %in% installed.packages()) install.packages("shinydashboard")
library(shinydashboard)
if (!'ggplot2' %in% installed.packages()) install.packages("ggplot2")
library(ggplot2)
if (!'remotes' %in% installed.packages()) install.packages("remotes")
if (!'rPeaks' %in% installed.packages()) remotes::install_github("jrminter/rPeaks")
library(rPeaks)
if (!'Rcpp' %in% installed.packages()) install.packages("Rcpp")
library(Rcpp)
if (!'coin' %in% installed.packages()) install.packages("coin")
library(coin)
if (!'DT' %in% installed.packages()) install.packages("DT")
library(DT)
if (!'multcomp' %in% installed.packages()) install.packages("multcomp")
library(multcomp)
if (!'dplyr' %in% installed.packages()) install.packages("dplyr")
library(dplyr)
if (!'tidyr' %in% installed.packages()) install.packages("tidyr")
library(tidyr)
##source functions
source("functions.R")
source("ui.R")
source("server.R")
##run app
shinyApp(ui = ui, server = server)