If you use BaalChIP in published research, please cite [1].
de Santiago I, Liu W, Yuan K, O'Reilly M, Chilamakuri CS, Ponder BJ, Meyer K, Markowetz F.
BaalChIP: Bayesian analysis of allele-specific transcription factor binding in cancer genomes.
Genome Biology 2017 18(1):39.
BaalChIP is a rigorous statistical method to identify allele-specific binding of transcription factors, which is important, for example, to understand the functional consequences of the many disease-risk associated SNPs occurring in non-coding DNA. BaalChIP (Bayesian Analysis of Allelic imbalances from ChIP-seq data) comprehensively combines a strict filtering and quality-control pipeline for quality control with a Bayesian statistical model that corrects for biases introduced by overdispersion, biases towards the reference allele, and most importantly, differences in allele frequencies due to copy number changes (Figure 1).
Figure 1: Description of BaalChIP model frame work. (a) The basic inputs for Baal are the ChIP-seq raw read counts in a standard BAM alignment format, a BED file with the genomic regions of interest (such as ChIP-seq peaks) and a set of heterozygous SNPs in a tab-delimited text file. Optionally, genomic DNA (gDNA) BAM files can be specified for RAF computation, alternatively, the user can specify the pre-computed RAF scores for each variant. (b) The first module of BaalChIP consists of (1) computing allelic read counts for each heterozygous SNP in peak regions and (2) a round of filters to exclude heterozygous SNPs that are susceptible to generating artifactual allele-specific binding effects. (3) the Reference Mapping (RM) bias and the Reference Allele Frequency (RAF) are computed internally and the output consists of a data matrix where RM and RAF scores are included alongside the information of allele counts for each heterozygous SNP. The column ‘Peak’ contains binary data used to state the called peaks. (c) The second module of BaalChIP consists of calling ASB binding events. (4) BaalChIP uses a beta-binomial Bayesian model to consider RM and RAF bias when detecting the ASB events. (d) The output from BaalChIP is a posterior distribution for each SNP. A threshold to identify SNPs with allelic bias is specified by the user (default value is a 95% interval). (5) Finally, a credible interval (‘Lower’ and ‘Upper’) calculated based on the posterior distribution. This interval corresponds to the true allelic ratio in read counts (i.e. after correcting for RM and RAF biases). An ASB event is called if the lower and upper limits of the interval are outside the 0.4-0.6 interval.
The first example dataset consists of ChIP-seq data obtained from two cell lines: A cancer cell-line (MCF7) and a normal cell line (GM12891). In this example dataset, pre-computed reference allele frequency (RAF) scores are used to correct the allelic read counts for biases caused by copy number alterations.
The first step in a BaalChIP analysis pipeline is to construct a BaalChIP class object:
wd <- system.file("test",package="BaalChIP") #system directory
samplesheet <- file.path(wd, "exampleChIP1.tsv")
hets <- c("MCF7"="MCF7_hetSNP.txt", "GM12891"="GM12891_hetSNP.txt")
res <- BaalChIP(samplesheet=samplesheet, hets=hets)
Given a new BaalChIP object, to run a BaalChIP analysis and identify allele-specific binding events, type:
res <- BaalChIP(samplesheet=samplesheet, hets=hets)
res <- BaalChIP.run(res, cores=4, verbose=TRUE) #cores for parallel computing
Note that the example data in this vignette does not reveal real biology and was build only for demonstration purposes.
We have shown a typical analysis pipeline performed with the wrapper function BaalChIP.run
.
If you wish to have more control over the input options, the same analysis above can be performed with various commands as follows:
#create BaalChIP object
samplesheet <- file.path(wd, "exampleChIP1.tsv")
hets <- c("MCF7"="MCF7_hetSNP.txt", "GM12891"="GM12891_hetSNP.txt")
res <- BaalChIP(samplesheet=samplesheet, hets=hets)
#Now, load some data
data(blacklist_hg19)
data(pickrell2011cov1_hg19)
data(UniqueMappability50bp_hg19)
#run one at the time (instead of BaalChIP.run)
res <- alleleCounts(res, min_base_quality=10, min_mapq=15, verbose=FALSE)
res <- QCfilter(res,
RegionsToFilter=c("blacklist_hg19", "pickrell2011cov1_hg19"),
RegionsToKeep="UniqueMappability50bp_hg19",
verbose=FALSE)
res <- mergePerGroup(res)
res <- filter1allele(res)
res <- getASB(res,
Iter=5000,
conf_level=0.95,
cores=4, RMcorrection = TRUE,
RAFcorrection=TRUE)
The following sections describe all these steps in more detail.
The second dataset contains ChIP-seq and genomic DNA (gDNA) data obtained from two ChIP-seq studies. In this example, the allelic-ratios obtained from the sequenced gDNA samples are used to correct the allelic read counts for biases caused by copy number alterations.
First, we create a named list of filenames for the ‘.bam’ gDNA files to be used. The names in the list (“TaT1” and “AMOVC”) should correspond to group_name strings in the samplesheet.
gDNA <- list("TaT1"=
c(file.path(wd, "bamFiles/TaT1_1_gDNA.test.bam"),
file.path(wd, "bamFiles/TaT1_2_gDNA.test.bam")),
"AMOVC"=
c(file.path(wd, "bamFiles/AMOVC_1_gDNA.test.bam"),
file.path(wd, "bamFiles/AMOVC_2_gDNA.test.bam")))
Now we can run BaalChIP pipeline as before. Note that we include the path to the gDNA files in the CorrectWithgDNA
argument:
wd <- system.file("test",package="BaalChIP") #system directory
samplesheet <- file.path(wd, "exampleChIP2.tsv")
hets <- c("TaT1"="TaT1_hetSNP.txt", "AMOVC"="AMOVC_hetSNP.txt")
res2 <- BaalChIP(samplesheet=samplesheet, hets=hets, CorrectWithgDNA=gDNA)
res2 <- BaalChIP.run(res2, cores=4, verbose=TRUE) #cores for parallel computing
Note that the example data in this vignette does not reveal real biology and was build only for demonstration purposes.
In order to run BaalChIP, one needs to generate a sample sheet describing the samples and the groups within each study. This file should be saved as a tab-delimited file. The extension of this file is not important, for example it can be .txt as long as it is a tab-delimited file. Two example .tsv sample sheets have been included in this vignette and can be assessed as follows:
samplesheet <- read.delim(file.path(wd,"exampleChIP1.tsv"))
samplesheet
## group_name target replicate_number bam_name
## 1 MCF7 cFOS 1 bamFiles/MCF7_cFOS_Rep1.bam
## 2 MCF7 cFOS 2 bamFiles/MCF7_cFOS_Rep2.bam
## 3 MCF7 cMYC 1 bamFiles/MCF7_cMYC_Rep1.bam
## 4 MCF7 cMYC 2 bamFiles/MCF7_cMYC_Rep2.bam
## 5 MCF7 POL2 1 bamFiles/MCF7_POL2_Rep1.bam
## 6 MCF7 POL2 2 bamFiles/MCF7_POL2_Rep2.bam
## 7 MCF7 STAT3 1 bamFiles/MCF7_STAT3_Rep1.bam
## 8 MCF7 STAT3 2 bamFiles/MCF7_STAT3_Rep2.bam
## 9 GM12891 POL2 1 bamFiles/GM12891_POL2_Rep1.bam
## 10 GM12891 POL2 2 bamFiles/GM12891_POL2_Rep2.bam
## 11 GM12891 PAX5 1 bamFiles/GM12891_PAX5_Rep1.bam
## 12 GM12891 PAX5 2 bamFiles/GM12891_PAX5_Rep2.bam
## 13 GM12891 PU1 1 bamFiles/GM12891_PU1_Rep1.bam
## 14 GM12891 PU1 2 bamFiles/GM12891_PU1_Rep2.bam
## 15 GM12891 TAF1 1 bamFiles/GM12891_TAF1_Rep1.bam
## 16 GM12891 TAF1 2 bamFiles/GM12891_TAF1_Rep2.bam
## bed_name
## 1 bedFiles/MCF7_cFOS.bed
## 2 bedFiles/MCF7_cFOS.bed
## 3 bedFiles/MCF7_cMYC.bed
## 4 bedFiles//MCF7_cMYC.bed
## 5 bedFiles/MCF7_POL2.bed
## 6 bedFiles/MCF7_POL2.bed
## 7 bedFiles/MCF7_STAT3.bed
## 8 bedFiles/MCF7_STAT3.bed
## 9 bedFiles/GM12891_POL2.bed
## 10 bedFiles/GM12891_POL2.bed
## 11 bedFiles/GM12891_PAX5.bed
## 12 bedFiles/GM12891_PAX5.bed
## 13 bedFiles/GM12891_PU1.bed
## 14 bedFiles/GM12891_PU1.bed
## 15 bedFiles/GM12891_TAF1.bed
## 16 bedFiles/GM12891_TAF1.bed
This sample sheet details the metadata for ChIP-seq studies in MCF7 and GM12891 cell lines. For each study, ChIP-seq data exists for four transcription factors and 2 replicates each (hence, 16 BAM files).
group_name
identifies the group label of each study (MCF7, GM12891).target
corresponds to the name of the transcription factor.replicate_number
shows that there are two biological replicates for each ChIP-seq factor.bam_name
corresponds to the file paths to the BAM files with the aligned reads.bed_name
corresponds to the file paths to the BED files with the genomic regions of signal enrichment that the user is interested in (typically these are the ChIP-seq peaks files). For each TF ChIP-seq sample, BaalChIP will only test SNPs overlapping these defined genomic intervals of interest.Here is another example sample sheet:
samplesheet <- read.delim(file.path(wd,"exampleChIP2.tsv"))
samplesheet
## group_name target replicate_number bam_name
## 1 TaT1 regions 1 bamFiles/TaT1_1.test.bam
## 2 TaT1 regions 2 bamFiles/TaT1_2.test.bam
## 3 AMOVC regions 1 bamFiles/AMOVC_1.test.bam
## 4 AMOVC regions 2 bamFiles/AMOVC_2.test.bam
## bed_name
## 1 bedFiles/TaT1_peaks_example.bed
## 2 bedFiles/TaT1_peaks_example.bed
## 3 bedFiles/AMOVC_peaks_example.bed
## 4 bedFiles/AMOVC_peaks_example.bed
This sample sheet details the metadata for ChIP-seq studies in TaT1 and AMOVC experimental groups. For each study, ChIP-seq data exists for one transcription factors and 2 replicates each (hence, 4 BAM files).
BaalChIP requires a variant file containing the list of heterozygous variants to be analysed. As an example, hets files have been included in this vignette and can be assessed as follows:
head(read.delim(file.path(system.file("test",package="BaalChIP"),"MCF7_hetSNP.txt")))
## ID CHROM POS REF ALT RAF
## 1 rs10169169 chr2 191412889 T G 0.4870296
## 2 rs1021813 chr3 59413060 T C 0.4689580
## 3 rs1025641 chr10 128307192 T C 0.4077530
## 4 rs10444404 chr12 15114751 T G 0.5195654
## 5 rs1048347 chr10 124096061 A C 0.4852518
## 6 rs10495062 chr1 217804955 T C 0.3654244
The information in the variant file includes:
ID
column with a unique identifier string per variant.CHROM, POS
.REF
and the non-reference alternate ALT
allele.RAF
is optional. RAF scores consist of values ranging from 0 to 1 for each variant denoting the reference allele frequency. A value between 0.5 and 1 denotes a bias to the reference allele, and a value between 0 and 0.5 a bias to the alternate allele. This column is optional, and will not be necessary if ask BaalChIP to calculate the RAF values from the input gDNA libraries (by using CorrectWithgDNA
argument of the BaalChIP-class constructor function BaalChIP
- see below).The gDNA BAM files are input genomic DNA sequencing files for the corresponding groups in the ChIP-seq test data. These BAM files are passed to BaalChIP through the CorrectWithgDNA
argument of the BaalChIP-class constructor function BaalChIP
.
Allelic read counts from all gDNA files will be pooled together to generate the background allelic ratios directly from input data.
The first step is to generate a BaalChIP object. The function BaalChIP
accepts the following arguments:
samplesheet
: A character string indicating the file name for a tab-delimited file.hets
: A named vector with filenames for the variant files to be used. The names in the vector should correspond to the group_name
strings in the samplesheet.CorrectWithgDNA
: An optional named list with filenames for the BAM gDNA files to be used. The names in the vector should correspond to group_name
strings in the samplesheet. If the CorrectWithgDNA
argument is missing or set to NULL, BaalChIP will try to read the reference allelic ratios from the information in the RAF column of the hets files indicated by the hets
argument. If both (RAF column and CorrectWithgDNA
) are missing, BaalChIP will not correct for copy-number bias.samplesheet <- file.path(wd,"exampleChIP1.tsv")
hets <- c("MCF7"="MCF7_hetSNP.txt", "GM12891"="GM12891_hetSNP.txt")
res <- BaalChIP(samplesheet=samplesheet, hets=hets)
res
## Type : BaalChIP
## Samples : 16
## Experiments : MCF7 GM12891
## Filtering and QC : None
## Run allele-specific : None
The samplesheet and hets information are saved in the samples
slot of a BaalChIP object:
BaalChIP.get(res, what="samples")
## $samples
## group_name target replicate_number
## 1 MCF7 cFOS 1
## 2 MCF7 cFOS 2
## 3 MCF7 cMYC 1
## 4 MCF7 cMYC 2
## 5 MCF7 POL2 1
## 6 MCF7 POL2 2
## 7 MCF7 STAT3 1
## 8 MCF7 STAT3 2
## 9 GM12891 POL2 1
## 10 GM12891 POL2 2
## 11 GM12891 PAX5 1
## 12 GM12891 PAX5 2
## 13 GM12891 PU1 1
## 14 GM12891 PU1 2
## 15 GM12891 TAF1 1
## 16 GM12891 TAF1 2
## bam_name
## 1 /home/biocbuild/bbs-3.20-bioc/tmpdir/RtmpS4m69W/Rinst3670a9643e9a73/BaalChIP/test/bamFiles/MCF7_cFOS_Rep1.bam
## 2 /home/biocbuild/bbs-3.20-bioc/tmpdir/RtmpS4m69W/Rinst3670a9643e9a73/BaalChIP/test/bamFiles/MCF7_cFOS_Rep2.bam
## 3 /home/biocbuild/bbs-3.20-bioc/tmpdir/RtmpS4m69W/Rinst3670a9643e9a73/BaalChIP/test/bamFiles/MCF7_cMYC_Rep1.bam
## 4 /home/biocbuild/bbs-3.20-bioc/tmpdir/RtmpS4m69W/Rinst3670a9643e9a73/BaalChIP/test/bamFiles/MCF7_cMYC_Rep2.bam
## 5 /home/biocbuild/bbs-3.20-bioc/tmpdir/RtmpS4m69W/Rinst3670a9643e9a73/BaalChIP/test/bamFiles/MCF7_POL2_Rep1.bam
## 6 /home/biocbuild/bbs-3.20-bioc/tmpdir/RtmpS4m69W/Rinst3670a9643e9a73/BaalChIP/test/bamFiles/MCF7_POL2_Rep2.bam
## 7 /home/biocbuild/bbs-3.20-bioc/tmpdir/RtmpS4m69W/Rinst3670a9643e9a73/BaalChIP/test/bamFiles/MCF7_STAT3_Rep1.bam
## 8 /home/biocbuild/bbs-3.20-bioc/tmpdir/RtmpS4m69W/Rinst3670a9643e9a73/BaalChIP/test/bamFiles/MCF7_STAT3_Rep2.bam
## 9 /home/biocbuild/bbs-3.20-bioc/tmpdir/RtmpS4m69W/Rinst3670a9643e9a73/BaalChIP/test/bamFiles/GM12891_POL2_Rep1.bam
## 10 /home/biocbuild/bbs-3.20-bioc/tmpdir/RtmpS4m69W/Rinst3670a9643e9a73/BaalChIP/test/bamFiles/GM12891_POL2_Rep2.bam
## 11 /home/biocbuild/bbs-3.20-bioc/tmpdir/RtmpS4m69W/Rinst3670a9643e9a73/BaalChIP/test/bamFiles/GM12891_PAX5_Rep1.bam
## 12 /home/biocbuild/bbs-3.20-bioc/tmpdir/RtmpS4m69W/Rinst3670a9643e9a73/BaalChIP/test/bamFiles/GM12891_PAX5_Rep2.bam
## 13 /home/biocbuild/bbs-3.20-bioc/tmpdir/RtmpS4m69W/Rinst3670a9643e9a73/BaalChIP/test/bamFiles/GM12891_PU1_Rep1.bam
## 14 /home/biocbuild/bbs-3.20-bioc/tmpdir/RtmpS4m69W/Rinst3670a9643e9a73/BaalChIP/test/bamFiles/GM12891_PU1_Rep2.bam
## 15 /home/biocbuild/bbs-3.20-bioc/tmpdir/RtmpS4m69W/Rinst3670a9643e9a73/BaalChIP/test/bamFiles/GM12891_TAF1_Rep1.bam
## 16 /home/biocbuild/bbs-3.20-bioc/tmpdir/RtmpS4m69W/Rinst3670a9643e9a73/BaalChIP/test/bamFiles/GM12891_TAF1_Rep2.bam
## bed_name
## 1 /home/biocbuild/bbs-3.20-bioc/tmpdir/RtmpS4m69W/Rinst3670a9643e9a73/BaalChIP/test/bedFiles/MCF7_cFOS.bed
## 2 /home/biocbuild/bbs-3.20-bioc/tmpdir/RtmpS4m69W/Rinst3670a9643e9a73/BaalChIP/test/bedFiles/MCF7_cFOS.bed
## 3 /home/biocbuild/bbs-3.20-bioc/tmpdir/RtmpS4m69W/Rinst3670a9643e9a73/BaalChIP/test/bedFiles/MCF7_cMYC.bed
## 4 /home/biocbuild/bbs-3.20-bioc/tmpdir/RtmpS4m69W/Rinst3670a9643e9a73/BaalChIP/test/bedFiles//MCF7_cMYC.bed
## 5 /home/biocbuild/bbs-3.20-bioc/tmpdir/RtmpS4m69W/Rinst3670a9643e9a73/BaalChIP/test/bedFiles/MCF7_POL2.bed
## 6 /home/biocbuild/bbs-3.20-bioc/tmpdir/RtmpS4m69W/Rinst3670a9643e9a73/BaalChIP/test/bedFiles/MCF7_POL2.bed
## 7 /home/biocbuild/bbs-3.20-bioc/tmpdir/RtmpS4m69W/Rinst3670a9643e9a73/BaalChIP/test/bedFiles/MCF7_STAT3.bed
## 8 /home/biocbuild/bbs-3.20-bioc/tmpdir/RtmpS4m69W/Rinst3670a9643e9a73/BaalChIP/test/bedFiles/MCF7_STAT3.bed
## 9 /home/biocbuild/bbs-3.20-bioc/tmpdir/RtmpS4m69W/Rinst3670a9643e9a73/BaalChIP/test/bedFiles/GM12891_POL2.bed
## 10 /home/biocbuild/bbs-3.20-bioc/tmpdir/RtmpS4m69W/Rinst3670a9643e9a73/BaalChIP/test/bedFiles/GM12891_POL2.bed
## 11 /home/biocbuild/bbs-3.20-bioc/tmpdir/RtmpS4m69W/Rinst3670a9643e9a73/BaalChIP/test/bedFiles/GM12891_PAX5.bed
## 12 /home/biocbuild/bbs-3.20-bioc/tmpdir/RtmpS4m69W/Rinst3670a9643e9a73/BaalChIP/test/bedFiles/GM12891_PAX5.bed
## 13 /home/biocbuild/bbs-3.20-bioc/tmpdir/RtmpS4m69W/Rinst3670a9643e9a73/BaalChIP/test/bedFiles/GM12891_PU1.bed
## 14 /home/biocbuild/bbs-3.20-bioc/tmpdir/RtmpS4m69W/Rinst3670a9643e9a73/BaalChIP/test/bedFiles/GM12891_PU1.bed
## 15 /home/biocbuild/bbs-3.20-bioc/tmpdir/RtmpS4m69W/Rinst3670a9643e9a73/BaalChIP/test/bedFiles/GM12891_TAF1.bed
## 16 /home/biocbuild/bbs-3.20-bioc/tmpdir/RtmpS4m69W/Rinst3670a9643e9a73/BaalChIP/test/bedFiles/GM12891_TAF1.bed
## sampleID
## 1 MCF7_cFOS_1
## 2 MCF7_cFOS_2
## 3 MCF7_cMYC_1
## 4 MCF7_cMYC_2
## 5 MCF7_POL2_1
## 6 MCF7_POL2_2
## 7 MCF7_STAT3_1
## 8 MCF7_STAT3_2
## 9 GM12891_POL2_1
## 10 GM12891_POL2_2
## 11 GM12891_PAX5_1
## 12 GM12891_PAX5_2
## 13 GM12891_PU1_1
## 14 GM12891_PU1_2
## 15 GM12891_TAF1_1
## 16 GM12891_TAF1_2
##
## $hets
## MCF7
## "/home/biocbuild/bbs-3.20-bioc/tmpdir/RtmpS4m69W/Rinst3670a9643e9a73/BaalChIP/test/MCF7_hetSNP.txt"
## GM12891
## "/home/biocbuild/bbs-3.20-bioc/tmpdir/RtmpS4m69W/Rinst3670a9643e9a73/BaalChIP/test/GM12891_hetSNP.txt"
The next step is to compute for each SNP the number of reads carrying the reference (REF) and alternative (ALT) alleles. The alleleCounts
function will read and scan all BAM files within the samples
slot of a BaalChIP object and compute the read coverage at each allele. Allele counts are computed using the pileup
function of the Rsamtools package [2].
Note that for each BAM file, it will only consider heterozygous SNPs overlapping the genomic regions in the corresponding BED files.
Two arguments can be manipulated by the user:
min_mapq
refers to the minimum “MAPQ” value for an alignment to be included in pileup (default is 15).min_base_quality
refers to the minimum “QUAL” value for each nucleotide in an alignment (default is 10).#run alleleCounts
res <- alleleCounts(res, min_base_quality=10, min_mapq=15, verbose=FALSE)
After computing the read counts per allele, the next step in the BaalChIP pipeline is an extensive quality control to consider technical biases that may contribute to the false identification of regulatory SNPs.
The function QCfilter
is used to excluded sites susceptible to allelic mapping bias in regions of known problematic read alignment [3] [4] [5] [6].
This function accepts two arguments:
RegionsToFilter
a named list of GRanges objects with the genomic regions to be excludedRegionsToKeep
a named list GRanges object with the genomic regions to be kept. This works in an opposite way to ‘RegionstoFilter’, variants NOT overlapping these regions will be removedSets of filtering regions used in this step are fully customized and additional sets can be added by the user as GenomicRanges objects [7].
Three sets of regions are included with BaalChIP package for the hg19 reference of the human genome:
data(blacklist_hg19)
data(pickrell2011cov1_hg19)
data(UniqueMappability50bp_hg19)
blacklist_hg19
contains blacklisted genomic regions downloaded from the mappability track of the UCSC Genome Browser [3] (hg19, wgEncodeDacMapabilityConsensusExcludable and wgEncodeDukeMapabilityRegionsExcludable tables). These correspond to artifact regions that tend to show artificially high signal (excessive unstructured anomalous reads mapping). These regions should be used as RegionsToFilter
so that variants overlapping these regions will be removed. Note that these blacklists are applicable to functional genomic data (e.g. ChIP-seq, MNase-seq, DNase-seq, FAIRE-seq) of short reads (20-100bp reads). These are not applicable to RNA-seq or other transcriptome data types.pickrell2011cov1_hg19
contains collapsed repeat regions at the 0.1% threshold [4]. These regions should also be used as RegionsToFilter
.UniqueMappability50bp_hg19
contains unique regions with genomic mappability score of 1, selected from DUKE uniqueness mappability track of the UCSC genome browser generated using a window size of 50bp (hg19, wgEncodeCrgMapabilityAlign50mer table). These regions should be used as RegionsToKeep
so that variants NOT overlapping these regions will be removed. No applicable to longer reads (> 50bp)#run QC filter
res <- QCfilter(res,
RegionsToFilter=list("blacklist"=blacklist_hg19, "highcoverage"=pickrell2011cov1_hg19),
RegionsToKeep=list("UniqueMappability"=UniqueMappability50bp_hg19),
verbose=FALSE)
res <- mergePerGroup(res)
res <- filter1allele(res)
The function filterIntbias
can be used to apply a simulation-based filtering to exclude SNPs with intrinsic bias to one of the alleles [8] [9].
This bias occurs due to intrinsic characteristics of the genome that translate into different probabilities of read mapping.
Even when reads differ only in one location, reads carrying one of the alleles may have a higher chance of matching multiple locations (i.e. have many repeats in the genome) and may therefore be mapped to an incorrect locus.
This, in turn, results in the underestimation of read counts and may cause both false-positive and false-negative inferences of ASB.
This filter performs the following steps:
run_simulations.sh
found in the folder extra
of the BaalChIP R package. The alignment pipeline can be fully customized by the user (e.g. with other aligners, etc)pileup
function of the Rsamtools package [2].The default run_simulations.sh
script can be found here:
/home/biocbuild/bbs-3.20-bioc/tmpdir/RtmpS4m69W/Rinst3670a9643e9a73/BaalChIP/test/extra/simulation_run.sh
Note: Since we are using an artificial example dataset, this filter will not give meaningful results.
This is how the command to run this filtering step would look like:
res <- filterIntbias(res,
simul_output="directory_name",
tmpfile_prefix="prefix_name",
simulation_script = "local",
alignmentSimulArgs=c("picard-tools-1.119",
"bowtie-1.1.1",
"genomes_test/male.hg19",
"genomes_test/maleByChrom")
verbose=FALSE)
The function accepts three arguments:
simul_output
allows the user to specify the name of the directory of where to save the generated simulated FASTQ and BAM files. if NULL or missing, a random directory under the current working directory will be generatedtmpfile_prefix
argument is a character vector giving the initial part of the name of the FASTQ and BAM files generated by the function. If NULL or missing, a random prefix name will be generated.simulation_script
the file path for simulation script containing the instructions of simulation and alignment commands. If set to ‘local’, the default simulation script distributed with BaalChIP (‘extra/simulation_run.sh’) will be used. Otherwise the user can specify the path to their own simulation scripts.alignmentSimulArgs
this is a vector of character with arguments passed to the sumulation_run.sh script. There are four arguments: the complete path to the picard software, the complete path to the bowtie aligner, the basename of the indexed genome files, and finally A path to the folder containing gzipped files of the genome, separated by chromosome and named as: chr1.fa.gz, chr2.fa.gz, chr3.fa.gz, etc.For demonstration purposes, we have saved the output of the previous command in a external folder:
/home/biocbuild/bbs-3.20-bioc/tmpdir/RtmpS4m69W/Rinst3670a9643e9a73/BaalChIP/test/simuloutput
We can have a look at the saved files:
preComputed_output <- system.file("test/simuloutput",package="BaalChIP")
list.files(preComputed_output)
## [1] "c67c6ec6c433_aln32.bam" "c67c6ec6c433_aln32.bam.bai"
## [3] "c67c6ec6c433_aln32.fasta" "c67c6ec6c433_aln32.fasta.sam"
## [5] "c67c6ec6c433_aln32_snplist.txt" "c67c6ec6c433_aln34.bam"
## [7] "c67c6ec6c433_aln34.bam.bai" "c67c6ec6c433_aln34.fasta"
## [9] "c67c6ec6c433_aln34.fasta.sam" "c67c6ec6c433_aln36.bam"
## [11] "c67c6ec6c433_aln36.bam.bai" "c67c6ec6c433_aln36.fasta"
## [13] "c67c6ec6c433_aln36.fasta.sam" "c67c6ec6c433_snplist.txt"
By specifying skipScriptRun=TRUE
, BaalChIP will take the simulated reads allelic ratios directly from the pre-computed simulated datasets and use them for further filtering. This way, the simulation (step 1) and alignment (step 2) steps will be skipped.
For this particular example we can run:
res <- filterIntbias(res, simul_output=preComputed_output,
tmpfile_prefix="c67c6ec6c433",
skipScriptRun=TRUE,
verbose=FALSE)
The function mergePerGroup
is used select those SNPs that pass all filters in all replicated samples, provided that replicated samples exist. This QC step will mainly remove SNPs in regions where the ChIP-seq signal is not consistently detected across all replicates (for instance when coverage is zero in one of the replicates).
res <- mergePerGroup(res)
The final filtering step consists of removing possible homozygous SNPs by removing any site where only one allele is observed [10] [11]. The function filter1allele
will perform this step by pooling ChIP-seq reads from all examined samples and then eliminating those SNPs that contain no data (zero counts) for one of the alleles.
res <- filter1allele(res)
BaalChIP uses a Bayesian framework to infer allelic imbalance from read counts data while integrating copy number and technical bias information. BaalChIP applies a beta-binomial distribution to model read count data therefore accounting for extra variability (over-dispersion) in allelic counts, a phenomenon that is often observed in sequencing data [9] [12].
To run the ASB detection step type:
res <- getASB(res, Iter=5000, conf_level=0.95, cores = 4,
RMcorrection = TRUE,
RAFcorrection=TRUE)
At this step, BaalChIP considers two additional biases that may lead to inaccurate estimates of ASB: the reference mapping (RM) and the reference allele frequency (RAF) biases.
The RM bias occurs because the reference genome only represents a single “reference” allele at each SNP position. Reads that carry the “non-reference allele” have an extra mismatch to the reference sequence. Previous work has shown that this creates a marked bias in favor of the alignment of reads that contain the reference genome and could therefore affect the accuracy of allele-specific binding estimates [8]. The reference mapping bias is calculated as described in [10] and [11].
This bias correction can be turned on/off by using the argument RMcorrection=TRUE
or RMcorrection=FALSE
of the getASB
function
The RAF bias occurs due to alterations in the background abundance of each allele (e.g. in regions of copy-number alterations) and the correction for this bias is one of the key features of BaalChIP.
RAF values at each heterozygous variant are used in the model likelihood to correct of the observed ChIP-seq read counts relative to the amount of the reference allele. These are given as relative measures from 0 to 1, where values between 0.5 and 1 denote an underlying bias to the reference allele, and a value between 0 and 0.5 to the alternative allele.
This bias correction can be turned on/off by using the argument RAFcorrection=TRUE
or RAFcorrection=FALSE
of the getASB
function
The output of BaalChIP is a posterior distribution of the estimated allelic balance ratio in read counts observed after considering all sources of underlying biases
res
## Type : BaalChIP
## Samples : 16
## Experiments : MCF7 GM12891
## Filtering and QC : 6 filter(s) applied
## Run allele-specific : Yes: run BaalChIP.report(object)
The function BaalChIP.report
outputs a list with a table per group with the final results:
result <- BaalChIP.report(res)
head(result[["MCF7"]])
## ID CHROM POS REF ALT REF.counts ALT.counts Total.counts
## 1 rs10169169 chr2 191412889 T G 4 19 23
## 2 rs1021813 chr3 59413060 T C 3 18 21
## 3 rs10444404 chr12 15114751 T G 1 14 15
## 4 rs10495062 chr1 217804955 T C 2 13 15
## 5 rs10502400 chr18 10353940 A G 4 17 21
## 6 rs10512030 chr9 76484346 T C 1 15 16
## AR RMbias RAF Bayes_lower Bayes_upper Corrected.AR isASB
## 1 0.17391304 0.4946235 0.4870296 0.09275682 0.3900729 0.2414148 TRUE
## 2 0.14285714 0.4946235 0.4689580 0.07535283 0.3808823 0.2281176 TRUE
## 3 0.06666667 0.4946235 0.5195654 0.02347753 0.2964224 0.1599500 TRUE
## 4 0.13333333 0.4946235 0.3654244 0.08792807 0.5073374 0.2976327 FALSE
## 5 0.19047619 0.4946235 0.4670719 0.10302328 0.4302656 0.2666444 FALSE
## 6 0.06250000 0.4946235 0.4328198 0.02752114 0.3427208 0.1851210 TRUE
The reported data frame contains the following columns:
ID
: unique identifier string per analysed variant.CHROM
: chromosome identifier from the reference genome per variant.POS
: the reference position (1-based).REF
: reference base. Each base must be one of A,C,G,T in uppercase.ALT
: alternate non-reference base. Each base must be one of A,C,G,T in uppercase.REF.counts
: pooled counts of all reads with the reference allele.ALT.counts
: pooled counts of all reads with the non-reference allele.Total.counts
: pooled counts of all reads (REF + ALT).AR
: allelic ratio calculated directly from sequencing reads (REF / TOTAL).RMbias
: numerical value indicating the value estimated and applied by BaalChIP for the reference mapping bias. A value between 0.5 and 1 denotes a bias to the reference allele, and a value between 0 and 0.5 a bias to the alternative allele.RAF
: numerical value indicating the value applied by BaalChIP for the relative allele frequency (RAF) bias correction. A value between 0.5 and 1 denotes a bias to the reference allele, and a value between 0 and 0.5 a bias to the alternative allele.Bayes_lower
: lower interval for the estimated allelic ratio (allelic ratio is given by REF / TOTAL).Bayes_upper
: upper interval for the estimated allelic ratio (allelic ratio is given by REF / TOTAL).Corrected.AR
: average estimated allelic ratio (average between Bayes_lower and Bayes_upper). A value between 0.5 and 1 denotes a bias to the reference allele, and a value between 0 and 0.5 a bias to the alternative allele.isASB
: logical value indicating BaalChIP’s classification of variants into allele-specific.We applied BaalChIP to 548 samples from the ENCODE project [13]. In total 271 ChIP-seq experiments were analyzed, assaying a total of 8 cancer and 6 non-cancer cell lines representing different tissues. The data contained either 2 or 3 replicates per experiment and 4 to 42 DNA-binding proteins per cell line.
To load the ENCODEexample object type:
data(ENCODEexample)
ENCODEexample
## Type : BaalChIP
## Samples : 548
## Experiments : A549 HL60 MCF7 SKNSH T47D IMR90 GM12891 GM12892 MCF10 GM12878 H1hESC HeLa HepG2 K562
## Filtering and QC : 6 filter(s) applied
## Run allele-specific : Yes: run BaalChIP.report(object)
To demonstrate the generality of our approach, we applied BaalChIP to targeted FAIRE-sequencing data obtained from two breast-cancer cell lines, MDA-MB-134 and T-47D. In this dataset, the sequenced gDNA samples were used for the RAF correction step, i.e. allelic ratios at each SNP position were calculated directly from gDNA samples and used for bias correction.
To ensure a reliable set of heterozygous SNPs we applied the BaalChIP QC step with the default parameters and options.
The summary of the QC result can be viewed with the summaryQC
function:
a <- summaryQC(ENCODEexample)
This function outputs a list of two elements:
filtering_stats
shows the number of variants that were filtered out in each filter category and the total number that ‘pass’ all filters
summaryQC(ENCODEexample)[["filtering_stats"]]
## blacklist highcov mappability intbias replicates_merged Only1Allele
## A549 2 6 30 282 1076 341
## HL60 2 5 27 354 654 205
## MCF7 1 7 17 294 875 417
## SKNSH 0 8 37 457 1127 460
## T47D 1 2 7 127 290 132
## IMR90 10 26 110 1693 4361 1453
## GM12891 1 13 57 435 478 228
## GM12892 1 11 50 400 492 191
## MCF10 5 22 69 1126 4869 1451
## GM12878 8 32 118 923 1790 532
## H1hESC 9 22 93 694 1731 542
## HeLa 14 10 61 2124 3097 994
## HepG2 11 12 60 652 1391 496
## K562 6 12 37 528 1055 454
## pass
## A549 3025
## HL60 4228
## MCF7 4446
## SKNSH 8203
## T47D 1636
## IMR90 12097
## GM12891 4058
## GM12892 3826
## MCF10 6974
## GM12878 9734
## H1hESC 8120
## HeLa 6310
## HepG2 6943
## K562 5806
average_stats
shows the average number and average percentage of variants in each filter category, averaged across all analysed groups
summaryQC(ENCODEexample)[["average_stats"]]
## variable value.mean perc
## 1 blacklist 5.071429 0.05056683
## 2 highcov 13.428571 0.14638725
## 3 mappability 55.214286 0.60780096
## 4 intbias 720.642857 7.40425914
## 5 replicates_merged 1663.285714 16.37614213
## 6 Only1Allele 564.000000 5.82107554
## 7 pass 6100.428571 69.59376814
The average_stats
shows that on average 69.59% of SNPs pass all filters, meaning that BaalChIP removed an average of 30.41% of all SNPs (with slight variation between cell lines).
We can visualize the summary of the QC step with three different plots.
barplot_per_group
plots the number of variants that were filtered out per group.
plotQC(ENCODEexample, what="barplot_per_group")
boxplot_per_filter
plots the number of variants that were filtered out per filter category.
plotQC(ENCODEexample, what="boxplot_per_filter")
overall_pie
plots the average percentage of variants in each filter category (averaged across all groups analysed).
plotQC(ENCODEexample, what="overall_pie")