infile <- system.file("extdata", "test_alleleCounts_chr2.txt",
package = "TitanCNA")
#### LOAD DATA FROM TEXT FILE ####
data <- loadAlleleCounts(infile, symmetric = TRUE,
genomeStyle = "NCBI", header = TRUE)
## Not run:
# countsDF <- extractAlleleReadCounts(tumBam, tumBamIndex,
# germlineHetPosns, outputFilename = NULL,
# pileupParam = PileupParam())
# data <- loadAlleleCounts(countsDF, symmetric = TRUE,
# genomeStyle = "NCBI")
# ## End(Not run)
Run the code above in your browser using DataLab