installation/post_conda_steps.R

#!/usr/bin/env Rscript


#!/usr/bin/env Rscript
args <- commandArgs(trailingOnly=TRUE)
# test if there is at least one argument: if not, return an error
if (length(args)==0) {
  stop("At least one argument must be supplied (lock file).n", call.=FALSE)
} 
project_root <- args[1]

cat("project is", project_root,"\n")

packages_to_install <- c("dplyr","ggplot2","argparse","tidyverse","LDlinkR","devtools","openxlsx","mgsub","validate","testthat")

cat("RNV init")
renv::init(project=project_root, restart=TRUE, force=TRUE)

cat("RNV install packages")
renv::install(project=project_root, packages_to_install)

cat("RNV install github")
renv::install(project=project_root, "MRCIEU/TwoSampleMR")

cat("RNV hydrate")
renv::hydrate(project=project_root)

cat("RNV snapshot")
renv::snapshot(project=project_root, directory="R")
richardslab/MRutils documentation built on Dec. 22, 2021, 4 p.m.