tmp/fastqc.R

fastqc <- 'fastqc'
args <- commandArgs(trailingOnly = TRUE)
file <- args[1]
out_path <- args[2]
cores  <- args[3]

threads <- as.numeric(cores) * 2

system(paste(fastqc,
             file,
             '-t', threads,
             '-o', out_path)
)
msubirana/ergWgsTools documentation built on June 8, 2020, 8:07 a.m.