sevenC 1.10.0
Gene expression is regulated by binding of transcription factors (TF) to genomic DNA. However, many binding sites are in distal regulatory regions, such as enhancers, that are hundreds of kilobases apart from genes. These regulatory regions can physically interact with promoters of regulated genes by chromatin looping interactions. These looping interaction can be measured genome-wide by chromatin conformation capture techniques such as Hi-C or ChIA-PET (Rao et al. 2014; Tang et al. 2015). Despite many exciting insights into the three-dimensional organization of genomes, these experimental methods are not only elaborate and expansive but also have limited resolution and are only available for a limited number of cell types and conditions. In contrast, the binding sites of TFs can be detected genome-wide by ChIP-seq experiment with high resolution and are available for hundreds of TFs in many cell type and conditions. However, classical analysis of ChIP-seq gives only the direct binding sites of targeted TFs (ChIP-seq peaks) and it is not trivial to associate them to the regulated gene without chromatin looping information. Therefore, we provide a computational method to predict chromatin interactions from only genomic sequence features and ChIP-seq data. The predicted looping interactions can be used to associate TF binding sites (ChIP-seq peaks) or enhancers to regulated genes and thereby improve functional downstream analysis on the level of genes.
In this vignette, we show how to use the R package sevenC to predict chromatin looping interactions between CTCF motifs by using only ChIP-seq data form a single experiment. Furthermore, we show how to train the prediction model using custom data.
A more detailed explanation of the sevenC method together with prediction performance analysis is available in the associated preprint (Ibn-Salem and Andrade-Navarro 2018).
To install the sevenC package, start R and enter:
# install.packages("BiocManager")
BiocManager::install("sevenC")
Here we show how to use the sevenC package with default options to predict chromatin looping interactions among CTCF motif locations on the human chromosome 22. As input, we only use CTCF motif locations and a single bigWig file from a STAT1 ChIP-seq experiment in human GM12878 cells (Dunham et al. 2012).
library(sevenC)
# load provided CTCF motifs in human genome
motifs <- motif.hg19.CTCF.chr22
# get motifs pairs
gi <- prepareCisPairs(motifs)
# use example ChIP-seq bigWig file
bigWigFile <- system.file("extdata", "GM12878_Stat1.chr22_1-30000000.bigWig",
package = "sevenC")
# add ChIP-seq coverage and compute correaltion at motif pairs
gi <- addCor(gi, bigWigFile)
# predict looping interactions among all motif pairs
loops <- predLoops(gi)
Here we show in more detail each step of the loop prediction process. Again, we want to predict chromatin looping interactions among CTCF motif locations on chromosome 22 using a ChIP-seq for STAT1 in human GM12878 cells.
First, we need to prepare CTCF motif pairs as candidate anchors for chromatin
loop interactions. We use CTCF motif hits in human chromosome 22 as provide by
sevenC package. In general, any CTCF motifs can be
used if provided as GRanges
.
To use the motif similarity score as a predictive feature, the motif data should
contain -log10 transformed p-values describing the significance of each motif
hit.
Here, we use CTCF motif sites as provided from the JASPAR genome browser tracks
(Khan et al. 2018). The objedt motif.hg19.CTCF.chr22
in the r BiocStyle::Biocpkg("sevenC")
package contains CTCF motif locations on
chromosome 22. For more information on the motif data set, see
?motif.hg19.CTCF
.
library(sevenC)
# load provided CTCF motifs
motifs <- motif.hg19.CTCF.chr22
The CTCF motif are represented as GRanges
object from the r BiocStyle::Biocpkg("GenomicRanges")
package. There are 917 CTCF
motif locations on chromosome 22. The genome assembly is hg19. one metadata
column named score
shows motif match similarity as -log10 transformed
p-value.
To predict loops, we need the ChIP-seq signals at all motif sites. Therefore, we read an example bigWig file with ChIP-seq signals.
An example file with only data on a subset of chromosome 22 is provided as part of the sevenC package. The full file can be downloaded from ENCODE (Dunham et al. 2012) here. The file contains for each position in the genome the log-fold-change of ChIP-seq signals versus input control.
# use example ChIP-seq bigWig file
bigWigFile <- system.file("extdata", "GM12878_Stat1.chr22_1-30000000.bigWig",
package = "sevenC")
We add ChIP-seq signals to all motifs in a window of 1000 bp using the function
addCovToGR()
as follows.
# read ChIP-seq coverage
motifs <- addCovToGR(motifs, bigWigFile)
This adds a new metadata column to motifs
holding a NumericList
with
ChIP-seq signals for each motif location.
motifs$chip
## NumericList of length 917
## [["chr22"]] 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ... 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1
## [["chr22"]] 1 1 1 1 1 0 0 0 0 0 0 0 0 0 0 0 ... 1 1 2 2 2 2 2 2 2 2 2 2 2 2 2 2
## [["chr22"]] 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ... 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
## [["chr22"]] 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ... 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1
## [["chr22"]] 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ... 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
## [["chr22"]] 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ... 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
## [["chr22"]] 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ... 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
## [["chr22"]] 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ... 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
## [["chr22"]] 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ... 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
## [["chr22"]] 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 ... 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2
## ...
## <907 more elements>
Please note, on Windows systems, reading of bigWig files is currently not
supported. See help(rtracklayer::import.bw)
for more information. Users on
Windows need to get ChIP-seq signals around motif sites as a NumierList
object. A NumericList
l
with ChIP-signal counts around each motif list can
be added by motifs$chip <- l
.
Now we build a dataset with all pairs of CTCF motif within 1 Mb and annotate it with distance, motif orientation, and motif score.
gi <- prepareCisPairs(motifs, maxDist = 10^6)
gi
## StrictGInteractions object with 26076 interactions and 5 metadata columns:
## seqnames1 ranges1 seqnames2 ranges2 |
## <Rle> <IRanges> <Rle> <IRanges> |
## [1] chr22 16186188-16186206 --- chr22 16205307-16205325 |
## [2] chr22 16186188-16186206 --- chr22 16238548-16238566 |
## [3] chr22 16186188-16186206 --- chr22 16239188-16239206 |
## [4] chr22 16186188-16186206 --- chr22 16239827-16239845 |
## [5] chr22 16186188-16186206 --- chr22 16247246-16247264 |
## ... ... ... ... ... ... .
## [26072] chr22 51110780-51110798 --- chr22 51160028-51160046 |
## [26073] chr22 51110780-51110798 --- chr22 51172084-51172102 |
## [26074] chr22 51130130-51130148 --- chr22 51160028-51160046 |
## [26075] chr22 51130130-51130148 --- chr22 51172084-51172102 |
## [26076] chr22 51160028-51160046 --- chr22 51172084-51172102 |
## dist strandOrientation score_1 score_2 score_min
## <integer> <character> <numeric> <numeric> <numeric>
## [1] 19119 forward 6.05 5.72 5.72
## [2] 52360 forward 6.05 5.92 5.92
## [3] 53000 forward 6.05 5.90 5.90
## [4] 53639 forward 6.05 5.92 5.92
## [5] 61058 forward 6.05 5.92 5.92
## ... ... ... ... ... ...
## [26072] 49248 reverse 6.21 5.64 5.64
## [26073] 61304 reverse 6.21 5.90 5.90
## [26074] 29898 reverse 6.33 5.64 5.64
## [26075] 41954 reverse 6.33 5.90 5.90
## [26076] 12056 reverse 5.64 5.90 5.64
## -------
## regions: 917 ranges and 2 metadata columns
## seqinfo: 93 sequences (1 circular) from hg19 genome
The function prepareCisPairs()
returns a GInteractoin
object from the r BiocStyle::Biocpkg("InteractonSet")
package, representing all motif pairs
within the defined distance. The metadata columns of the GInteractoin
object
hold the genomic distance between motifs in bp (dist
), the orientation of
motifs (strandOrientation
), and the motif score as -log10 of the motif hit
p-value (score_1
, score_2
, and score_min
). Note, that the function
prepareCisPairs()
is a wrapper for three individual functions that perform
each step separately and allow more options. First, getCisPairs()
is used to
builds the GInteractoin
object. Than addStrandCombination()
adds the four
possible strand combinations of motifs pairs. Finally, addMotifScore()
adds
the minimum motif score for each pair. These genomic features are used later as
predictive variables.
Now, we compute the similarity of ChIP-seq signals for all motif pairs as the
correlation of signals across positions around motif centers. Thereby, for two
motifs the corresponding ChIP-seq signal vectors that were added to motifs
before, are compared by Pearson correlation. A high correlation of ChIP-seq
signals at two motifs indicates a similar ChIP-seq coverage profile at the two
motifs. This, in turn, is characteristic for physical interaction via chromatin
looping, where ChIP signals are found on both sides with a similar distance to
motif centers (Ibn-Salem and Andrade-Navarro 2018). The correlation coefficient is added as
additional metadata column to gi
.
# add ChIP-seq coverage and compute correaltion at motif pairs
gi <- addCovCor(gi)
Now we can predict chromatin loops integrating from the ChIP-seq correlation and
other genomic features in a logistic regression model. This is implemented in
the predLoops()
function.
loops <- predLoops(gi)
loops
## StrictGInteractions object with 607 interactions and 7 metadata columns:
## seqnames1 ranges1 seqnames2 ranges2 | dist
## <Rle> <IRanges> <Rle> <IRanges> | <integer>
## [1] chr22 16186188-16186206 --- chr22 16239188-16239206 | 53000
## [2] chr22 16205307-16205325 --- chr22 16409786-16409804 | 204479
## [3] chr22 16238548-16238566 --- chr22 16409786-16409804 | 171238
## [4] chr22 17398482-17398500 --- chr22 17539262-17539280 | 140780
## [5] chr22 17398482-17398500 --- chr22 17652850-17652868 | 254368
## ... ... ... ... ... ... . ...
## [603] chr22 26756542-26756560 --- chr22 27041422-27041440 | 284880
## [604] chr22 26763796-26763814 --- chr22 27041422-27041440 | 277626
## [605] chr22 28123236-28123254 --- chr22 28221328-28221346 | 98092
## [606] chr22 29225543-29225561 --- chr22 29436847-29436865 | 211304
## [607] chr22 29436847-29436865 --- chr22 29641698-29641716 | 204851
## strandOrientation score_1 score_2 score_min cor_chip pred
## <character> <numeric> <numeric> <numeric> <numeric> <numeric>
## [1] forward 6.05 5.90 5.90 0.885073 0.193089
## [2] convergent 5.72 5.79 5.72 0.415731 0.162644
## [3] convergent 5.92 5.79 5.79 0.675000 0.301512
## [4] convergent 6.48 6.89 6.48 0.790284 0.550519
## [5] convergent 6.48 8.49 6.48 0.221485 0.172598
## ... ... ... ... ... ... ...
## [603] reverse 8.27 7.93 7.93 0.349559 0.225008
## [604] reverse 8.59 7.93 7.93 0.739380 0.423643
## [605] reverse 6.29 8.16 6.29 0.601548 0.188785
## [606] reverse 6.73 6.33 6.33 0.928965 0.245978
## [607] reverse 6.33 7.27 6.33 0.909619 0.242532
## -------
## regions: 917 ranges and 2 metadata columns
## seqinfo: 93 sequences (1 circular) from hg19 genome
The predLoops()
function returns a subset of motif pairs that are predicted to
interact. The interactions are annotated with ChIP-seq correlation in column
cor_chip
. The column pred
holds the predicted interaction probability
according to the logistic regression model.
Note, that without specifying further options, the function predLoops()
uses a
default model that was optimized for several transcription factor ChIP-seq
datasets by using experimental chromatin loops from Hi-C and ChIA-PET for
validations (Ibn-Salem and Andrade-Navarro 2018). However, users can specify custom features using
the formula
argument and provide custom parameters using the betas
argument.
Furthermore, per default the predLoops()
function report only looping
interactions that reach a minimal prediction score threshold. The fraction of
reported loops can be modified using the cutoff
argument.
Predicted loops are represented as GInteraction
and can, therefore, be used
easily for downstream analysis with functions from the r BiocStyle::Biocpkg("InteractonSet")
package. For example, linking two sets of
regions (like ChIP-seq peaks and genes) can be done using the linkOverlaps
function. See the
vignette
from the InteractonSet package for more details and
examples on working with GInteraction
objects.
Since looping interactions are stored as GInteraction
objects, they can be
exported as
BEDPE
files using functions from GenomicInteractions
package. These files can be used for visualization in genome browsers or the
Juicebox tool.
library(GenomicInteractions)
# export to output file
export.bedpe(loops, "loop_interactions.bedpe", score = "pred")
Here, we show how to use sevenC to build and train a logistic regression model for loop prediction.
First, we need to build the pairs of motifs as candidates and add the ChIP-seq data as shown above.
# load provided CTCF motifs
motifs <- motif.hg19.CTCF.chr22
# use example ChIP-seq coverage file
bigWigFile <- system.file("extdata", "GM12878_Stat1.chr22_1-30000000.bigWig",
package = "sevenC")
# add ChIP-seq coverage
motifs <- addCovToGR(motifs, bigWigFile)
# build motif pairs
gi <- prepareCisPairs(motifs, maxDist = 10^6)
# add correaltion of ChIP-signal
gi <- addCovCor(gi)
We need to label true looping interactions by using experimental data of
chromatin interactions. Here, we use loops from high-resolution Hi-C experiments
in human GM12878 cells (Rao et al. 2014). An example file with loops on chromosome 22
is provided with the sevenC package and the function
parseLoopsRao()
reads loops in the format provided by Rao et al. and returns a
GInteraction
object.
# parse known loops
knownLoopFile <- system.file("extdata",
"GM12878_HiCCUPS.chr22_1-30000000.loop.txt", package = "sevenC")
knownLoops <- parseLoopsRao(knownLoopFile)
We can add a new metadata column to the motif pairs gi
, indicating whether the
pair is interacting in the experimental data using the function
addInteractionSupport()
.
# add known loops
gi <- addInteractionSupport(gi, knownLoops)
The experimental support is added as factor with levels "Loop"
and "No loop"
as metadata column named loop
. The column name can be modified using the
colname
argument.
We can use the R function glm()
to fit a logistic regression model in which
the loop
column is the dependent variable and the ChIP-seq correlation,
distance, and strand orientation are the predictors.
fit <- glm(
formula = loop ~ cor_chip + dist + strandOrientation,
data = mcols(gi),
family = binomial()
)
Now, we can use this model to add predicted looping probabilities.
# add predict loops
gi <- predLoops(
gi,
formula = loop ~ cor_chip + dist + strandOrientation,
betas = coef(fit),
cutoff = NULL
)
Here, we have to use the same formula as argument as in the model fitting step
above. The betas
argument takes the coefficients of the logistic regression
model. Finally, the argument cutoff = NULL
ensures that no filtering is done
and all input candidates are reported. The prediction score is added as a new
metadata column to gi
.
gi
## StrictGInteractions object with 26076 interactions and 8 metadata columns:
## seqnames1 ranges1 seqnames2 ranges2 |
## <Rle> <IRanges> <Rle> <IRanges> |
## [1] chr22 16186188-16186206 --- chr22 16205307-16205325 |
## [2] chr22 16186188-16186206 --- chr22 16238548-16238566 |
## [3] chr22 16186188-16186206 --- chr22 16239188-16239206 |
## [4] chr22 16186188-16186206 --- chr22 16239827-16239845 |
## [5] chr22 16186188-16186206 --- chr22 16247246-16247264 |
## ... ... ... ... ... ... .
## [26072] chr22 51110780-51110798 --- chr22 51160028-51160046 |
## [26073] chr22 51110780-51110798 --- chr22 51172084-51172102 |
## [26074] chr22 51130130-51130148 --- chr22 51160028-51160046 |
## [26075] chr22 51130130-51130148 --- chr22 51172084-51172102 |
## [26076] chr22 51160028-51160046 --- chr22 51172084-51172102 |
## dist strandOrientation score_1 score_2 score_min cor_chip
## <integer> <character> <numeric> <numeric> <numeric> <numeric>
## [1] 19119 forward 6.05 5.72 5.72 0.339540
## [2] 52360 forward 6.05 5.92 5.92 -0.104692
## [3] 53000 forward 6.05 5.90 5.90 0.885073
## [4] 53639 forward 6.05 5.92 5.92 -0.170961
## [5] 61058 forward 6.05 5.92 5.92 -0.104692
## ... ... ... ... ... ... ...
## [26072] 49248 reverse 6.21 5.64 5.64 NA
## [26073] 61304 reverse 6.21 5.90 5.90 NA
## [26074] 29898 reverse 6.33 5.64 5.64 NA
## [26075] 41954 reverse 6.33 5.90 5.90 NA
## [26076] 12056 reverse 5.64 5.90 5.64 NA
## loop pred
## <factor> <numeric>
## [1] No loop 0.002077368
## [2] No loop 0.000422511
## [3] No loop 0.012289515
## [4] No loop 0.000335909
## [5] No loop 0.000414237
## ... ... ...
## [26072] No loop NA
## [26073] No loop NA
## [26074] No loop NA
## [26075] No loop NA
## [26076] No loop NA
## -------
## regions: 917 ranges and 2 metadata columns
## seqinfo: 93 sequences (1 circular) from hg19 genome
As a very simple validation, we can now compare the prediction score for looping and non-looping motif pairs using a boxplot.
boxplot(gi$pred ~ gi$loop,
ylab = "Predicted interaction probability")
The plot shows higher prediction scores for truly looping motif pairs. However, this is an insufficient evaluation of prediction performance, since the prediction score is evaluated on the same data as it was trained. A more detailed evaluation of prediction performance using cross-validation and different cell types is described in the 7C paper (Ibn-Salem and Andrade-Navarro 2018).
sessionInfo()
## R version 4.0.3 (2020-10-10)
## Platform: x86_64-pc-linux-gnu (64-bit)
## Running under: Ubuntu 18.04.5 LTS
##
## Matrix products: default
## BLAS: /home/biocbuild/bbs-3.12-bioc/R/lib/libRblas.so
## LAPACK: /home/biocbuild/bbs-3.12-bioc/R/lib/libRlapack.so
##
## locale:
## [1] LC_CTYPE=en_US.UTF-8 LC_NUMERIC=C
## [3] LC_TIME=en_US.UTF-8 LC_COLLATE=C
## [5] LC_MONETARY=en_US.UTF-8 LC_MESSAGES=en_US.UTF-8
## [7] LC_PAPER=en_US.UTF-8 LC_NAME=C
## [9] LC_ADDRESS=C LC_TELEPHONE=C
## [11] LC_MEASUREMENT=en_US.UTF-8 LC_IDENTIFICATION=C
##
## attached base packages:
## [1] parallel stats4 stats graphics grDevices utils datasets
## [8] methods base
##
## other attached packages:
## [1] GenomicInteractions_1.24.0 sevenC_1.10.0
## [3] InteractionSet_1.18.0 SummarizedExperiment_1.20.0
## [5] Biobase_2.50.0 MatrixGenerics_1.2.0
## [7] matrixStats_0.57.0 GenomicRanges_1.42.0
## [9] GenomeInfoDb_1.26.0 IRanges_2.24.0
## [11] S4Vectors_0.28.0 BiocGenerics_0.36.0
## [13] BiocStyle_2.18.0
##
## loaded via a namespace (and not attached):
## [1] colorspace_1.4-1 ellipsis_0.3.1 biovizBase_1.38.0
## [4] htmlTable_2.1.0 XVector_0.30.0 base64enc_0.1-3
## [7] dichromat_2.0-0 rstudioapi_0.11 bit64_4.0.5
## [10] AnnotationDbi_1.52.0 xml2_1.3.2 splines_4.0.3
## [13] knitr_1.30 Formula_1.2-4 Rsamtools_2.6.0
## [16] cluster_2.1.0 dbplyr_1.4.4 png_0.1-7
## [19] readr_1.4.0 BiocManager_1.30.10 compiler_4.0.3
## [22] httr_1.4.2 backports_1.1.10 assertthat_0.2.1
## [25] Matrix_1.2-18 lazyeval_0.2.2 htmltools_0.5.0
## [28] prettyunits_1.1.1 tools_4.0.3 igraph_1.2.6
## [31] gtable_0.3.0 glue_1.4.2 GenomeInfoDbData_1.2.4
## [34] dplyr_1.0.2 rappdirs_0.3.1 Rcpp_1.0.5
## [37] vctrs_0.3.4 Biostrings_2.58.0 rtracklayer_1.50.0
## [40] xfun_0.18 stringr_1.4.0 lifecycle_0.2.0
## [43] ensembldb_2.14.0 XML_3.99-0.5 zlibbioc_1.36.0
## [46] scales_1.1.1 BSgenome_1.58.0 VariantAnnotation_1.36.0
## [49] ProtGenerics_1.22.0 hms_0.5.3 AnnotationFilter_1.14.0
## [52] RColorBrewer_1.1-2 yaml_2.2.1 curl_4.3
## [55] memoise_1.1.0 gridExtra_2.3 ggplot2_3.3.2
## [58] biomaRt_2.46.0 rpart_4.1-15 latticeExtra_0.6-29
## [61] stringi_1.5.3 RSQLite_2.2.1 checkmate_2.0.0
## [64] GenomicFeatures_1.42.0 boot_1.3-25 BiocParallel_1.24.0
## [67] rlang_0.4.8 pkgconfig_2.0.3 bitops_1.0-6
## [70] evaluate_0.14 lattice_0.20-41 purrr_0.3.4
## [73] GenomicAlignments_1.26.0 htmlwidgets_1.5.2 bit_4.0.4
## [76] tidyselect_1.1.0 magrittr_1.5 bookdown_0.21
## [79] R6_2.4.1 magick_2.5.0 generics_0.0.2
## [82] Hmisc_4.4-1 DelayedArray_0.16.0 DBI_1.1.0
## [85] pillar_1.4.6 foreign_0.8-80 survival_3.2-7
## [88] RCurl_1.98-1.2 nnet_7.3-14 tibble_3.0.4
## [91] crayon_1.3.4 BiocFileCache_1.14.0 rmarkdown_2.5
## [94] jpeg_0.1-8.1 progress_1.2.2 grid_4.0.3
## [97] data.table_1.13.2 blob_1.2.1 digest_0.6.27
## [100] openssl_1.4.3 munsell_0.5.0 Gviz_1.34.0
## [103] askpass_1.1
Dunham, Ian, Anshul Kundaje, Shelley F Aldred, Patrick J Collins, Carrie a Davis, Francis Doyle, Charles B Epstein, et al. 2012. “An integrated encyclopedia of DNA elements in the human genome.” Nature 489 (7414):57–74. https://doi.org/10.1038/nature11247.
Ibn-Salem, Jonas, and Miguel A. Andrade-Navarro. 2018. “Computational Chromosome Conformation Capture by Correlation of ChIP-seq at CTCF motifs.” bioRxiv, February. Cold Spring Harbor Laboratory, 257584. https://doi.org/10.1101/257584.
Khan, Aziz, Oriol Fornes, Arnaud Stigliani, Marius Gheorghe, Jaime A Castro-Mondragon, Robin van der Lee, Adrien Bessy, et al. 2018. “JASPAR 2018: update of the open-access database of transcription factor binding profiles and its web framework.” Nucleic Acids Research 46 (D1):D260–D266. https://doi.org/10.1093/nar/gkx1126.
Rao, Suhas S P, Miriam H Huntley, Neva C Durand, Elena K Stamenova, Ivan D Bochkov, James T Robinson, Adrian L Sanborn, et al. 2014. “A 3D map of the human genome at kilobase resolution reveals principles of chromatin looping.” Cell 159 (7). Elsevier Inc.:1665–80. https://doi.org/10.1016/j.cell.2014.11.021.
Tang, Zhonghui, Oscar Junhong Luo, Xingwang Li, Meizhen Zheng, Jacqueline Jufen Zhu, Przemyslaw Szalaj, Pawel Trzaskoma, et al. 2015. “CTCF-Mediated Human 3D Genome Architecture Reveals Chromatin Topology for Transcription.” Cell. Elsevier Inc., 1–17. https://doi.org/10.1016/j.cell.2015.11.024.