In robinmeyers/niboR: Useful functions by Robin | niboR

knitr::opts_chunk$set(echo = T, message=F, warning=F)

### Load other libraries
library()

library(ProjectTemplate)
load.project()

threads <- 4

if (threads > 1) {
    library(doMC)
    registerDoMC(cores=threads)
    do_parallel <- T
} else {
    do_parallel <- F
}

### Edit output directory or include subdirectory
sub_dir <- 
out_dir <- file.path("./results", sub_dir, Sys.Date())
dir.create(out_dir, recursive = T, showWarnings = F)

robinmeyers/niboR documentation built on Dec. 5, 2019, 8:50 p.m.