# extract paths to the demo files
qc.dir <- system.file("fastqc_results", package = "fastqcr")
qc.files <- list.files(qc.dir, full.names = TRUE)[1:2]
nb_samples <- length(qc.files)
# read a specified module in all files
# To read all modules, specify: modules = "all"
qc <- qc_read_collection(qc.files,
sample_names = paste('S', 1:nb_samples, sep = ''),
modules = "Per base sequence quality")
Run the code above in your browser using DataLab