checkpoint("Rqc", path=system.file(package="Rqc", "extdata"), {
folder <- system.file(package="ShortRead", "extdata/E-MTAB-1147")
files <- list.files(full.names=TRUE, path=folder)
rqcResultSet <- rqcQA(files, pair=c(1,1), workers=1)
}, keep="rqcResultSet")
head(perCycleBasecall(rqcResultSet))
head(perCycleQuality(rqcResultSet))
head(perReadFrequency(rqcResultSet))
head(perReadQuality(rqcResultSet))
head(perReadWidth(rqcResultSet))
perFileInformation(rqcResultSet)
perFileTopReads(rqcResultSet)
Run the code above in your browser using DataLab