## ---- message=FALSE-----------------------------------------------------------
library(hiReadsProcessor)
## added to avoid package build failure on windows machines ##
if(.Platform$OS.type == "windows") { register(SerialParam()) }

## -----------------------------------------------------------------------------
runData <- system.file("extdata/FLX_sample_run/", package = "hiReadsProcessor")
list.files(runData, recursive  = TRUE)

## -----------------------------------------------------------------------------
seqProps <- read.SeqFolder(runData, seqfilePattern = ".+fna.gz$")
seqProps

## -----------------------------------------------------------------------------
seqProps$sectors$"1"$samples

## -----------------------------------------------------------------------------
seqProps <- findBarcodes(seqProps, sector = "all", showStats = TRUE)
seqProps
seqProps$sectors

## -----------------------------------------------------------------------------
load(file.path(system.file("data", package = "hiReadsProcessor"),
               "FLX_seqProps.RData"))

## ---- eval=FALSE--------------------------------------------------------------
#  seqProps <- findPrimers(seqProps, showStats=TRUE)

## ---- eval=FALSE--------------------------------------------------------------
#  seqProps <- findLTRs(seqProps, showStats=TRUE)

## ---- eval=FALSE--------------------------------------------------------------
#  seqProps <- findVector(seqProps, showStats = TRUE)

## ---- eval=FALSE--------------------------------------------------------------
#  seqProps <- findLinkers(seqProps, showStats=TRUE, doRC=TRUE)

## ---- eval=FALSE--------------------------------------------------------------
#  seqProps <- findIntegrations(seqProps,
#                               genomeIndices = c("hg18" = "/usr/local/genomeIndexes/hg18.noRandom.2bit"),
#                               numServers = 2)

## -----------------------------------------------------------------------------
sampleSummary(seqProps)

## -----------------------------------------------------------------------------
sessionInfo()