[37bd50]: / packages.R

Download this file

65 lines (61 with data), 1.3 kB

 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
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
getPckg <- function(pckg) install.packages(pckg, repos = "http://cran.r-project.org")
pckg = try(require(knitr))
if(!pckg) {
cat("Installing 'knitr' from CRAN\n")
getPckg("knitr")
require(knitr)
}
pckg = try(require(splines))
if(!pckg) {
cat("Installing 'splines' from CRAN\n")
getPckg("splines")
require(splines)
}
pckg = try(require(casebase))
if(!pckg) {
cat("Installing 'casebase' from CRAN\n")
getPckg("casebase")
require(casebase)
}
pckg = try(require(ggplot2))
if(!pckg) {
cat("Installing 'ggplot2' from CRAN\n")
getPckg("ggplot2")
require(ggplot2)
}
pckg = try(require(pacman))
if(!pckg) {
cat("Installing 'knitr' from CRAN\n")
getPckg("pacman")
require(pacman)
}
pckg = try(require(survival))
if(!pckg) {
cat("Installing 'survival' from CRAN\n")
getPckg("survival")
require(survival)
}
pckg = try(require(readr))
if(!pckg) {
cat("Installing 'readr' from CRAN\n")
getPckg("readr")
require(readr)
}
pckg = try(require(mice))
if(!pckg) {
cat("Installing 'mice' from CRAN\n")
getPckg("mice")
require(mice)
}
pckg = try(require(reshape2))
if(!pckg) {
cat("Installing 'reshape2' from CRAN\n")
getPckg("reshape2")
require(reshape2)
}
pckg = try(require(RColorBrewer))
if(!pckg) {
cat("Installing 'RColorBrewer' from CRAN\n")
getPckg("RColorBrewer")
require(RColorBrewer)
}