-
Notifications
You must be signed in to change notification settings - Fork 1
/
global.R
42 lines (38 loc) · 1.11 KB
/
global.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
34
35
36
37
38
39
40
41
42
# Check if all required packages are installed, if not, attempt to install the missing ones
required_packages = c(
"data.table",
"factoextra",
"dtw",
"shiny",
"shinyBS",
"shinycssloaders",
"ggplot2",
"pheatmap",
"heatmaply",
"RColorBrewer",
"ggthemes",
"sparcl"
)
missing_packages =
required_packages[!(required_packages %in% installed.packages()[, "Package"])]
if (length(missing_packages)) {
cat(paste(
"Missing packages:",
paste(missing_packages, collapse = ";"),
"\nAttempting to install them."
))
install.packages(missing_packages)
}
# The package is not available on CRAN anymore,
# install from the archive https://cran.r-project.org/src/contrib/Archive/bclust/
# if (!("bclust" %in% installed.packages())) {
# packageurl <- "https://cran.r-project.org/src/contrib/Archive/bclust/bclust_1.5.tar.gz"
# install.packages(packageurl, repos=NULL, type="source")
# }
source('modules/auxfn.R')
source('modules/downPlot.R')
source('modules/tabHist.R')
source('modules/tabHier.R')
source('modules/tabHierSparse.R')
#source('modules/tabBayClust.R')
source('modules/tabClValid.R')