data(sampleReadCounts)
data(referenceReadCounts)
## Gene names should be same size as row columns
geneNames <- row.names(referenceReadCounts)
ampliconNames <- NULL
normalizedReadCounts <- CombinedNormalizedCounts(sampleReadCounts,
referenceReadCounts,
ampliconNames = ampliconNames)
# After normalization data sets need to be splitted again to perform bootstrap
samplesNormalizedReadCounts = normalizedReadCounts["samples"][[1]]
referenceNormalizedReadCounts = normalizedReadCounts["reference"][[1]]
#Values above 10000 should be used
replicates <- 10
# Perform the bootstrap based analysis
bootList <- BootList(geneNames,
samplesNormalizedReadCounts,
referenceNormalizedReadCounts,
replicates = replicates)
background <- Background(geneNames,
samplesNormalizedReadCounts,
referenceNormalizedReadCounts,
bootList,
replicates = replicates,
significanceLevel = 0.1)
Run the code above in your browser using DataLab