statsCode/installMe.R at master · dataknut/statsCode · GitHub

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
# Script to run after updating R

installMyPackages <- function(..., repository = "https://cran.rstudio.com/"){

  packages <- c(...)

  # Find if package isn't installed
  newPackages <- packages[!(packages %in% utils::installed.packages()[,1])]

  # Install if required

  if (length(newPackages)){
    message("Installing: ", newPackages)
    utils::install.packages(newPackages,
                            dependencies = TRUE)
  } else {
    message("None missing")
  }
}

myPacks <- c("bookdown",
             "broom",
             "car",
             "data.table",
             "devtools",
             "drake",
             "ggplot2",
             "ggspatial",
             "here",
             "Hmisc",
             "hms",
             "ipfp",
             "kableExtra",
             "knitr",
             "leaflet",
             "lubridate",
             "plotly",
             "R.utils", #  To read gz and bz2 files directly, fread() requires 'R.utils' package
             "rmarkdown",
             "roxygen2",
             "sf",
             "skimr",
             "tidyverse",
             "usethis"
)

# do this manually
update.packages()

# only install the ones that are missing
installMyPackages(myPacks)

# get github ones
devtools::install_github("dataknut/dkUtils")
devtools::install_github("CfSOtago/GREENGridData")

# then re-build local packages if needed