.Rprofile

# When starting a new R session, a specific directory is added to the libPath.
# It's called libWin resp. libLinux. As it is on the first libPath position,
# packages are installed into this directory by default. This enables working in
# a sandbox.

.First <- function() {
  # Check operating system
  if (Sys.info()["sysname"] == "Windows") {
    # Add libWin with the full path to libPaths
    .libPaths(new = c(paste(getwd(), "libWin", sep = "/"), .libPaths()))
  } else if (Sys.info()["sysname"] == "Linux") {
    .libPaths(new = c(paste(getwd(), "libLinux", sep = "/"), .libPaths()))
  } else if (Sys.info()["sysname"] == "Darwin") {
    .libPaths(new = c(paste(getwd(), "libMac", sep = "/"), .libPaths()))
  }
  options(repos = c(getOption("repos"),
                    PANDORA = "https://Pandora-IsoMemo.github.io/drat/",
                    INWTLab = "https://inwtlab.github.io/drat/"))
}

.First()