multiHiCcompare 1.0.0

`multiHiCcompare`

is an extension of the original `HiCcompare`

package. It provides functions for the joint normalization and detection of differential chromatin interactions between multiple Hi-C datasets. `multiHiCcompare`

operates on processed Hi-C data in the form of chromosome-specific chromatin interaction matrices. It accepts four-column tab-separated text files storing chromatin interaction matrices in a sparse matrix format (see Creating the hicexp object). Functions to convert popular Hi-C data formats (`.hic`

, `.cool`

) to sparse format are available (see ?cooleHCT116_r2sparse). `multiHiCcompare`

differs from other packages that attempt to compare Hi-C data in that it works on processed data in chromatin interaction matrix format instead of raw sequencing data. In addition, `multiHiCcompare`

provides a non-parametric method for the joint normalization and removal of biases between multiple Hi-C datasets for the purpose of comparative analysis. `multiHiCcompare`

also provides a general linear model (GLM) based framework for detecting differences in Hi-C data.

`multiHiCcompare`

`multiHiCcompare`

from Bioconductor```
BiocManager::install("multiHiCcompare")
library(multiHiCcompare)
```

You will need processed Hi-C data in the form of sparse upper triangular matrices or BEDPE files in order to use `multiHiCcompare`

. Data is available from several sources and two examples for downloading and extracting data are listed below. If you have full Hi-C contact matrices you can convert them to sparse upper triangular format using the full `full2sparse`

function as shown in additional functions

`.hic`

filesHi-C data is available from several sources and in many formats. `multiHiCcompare`

is built to work with the sparse upper triangular matrix format popularized by the lab of Erez Lieberman-Aiden http://aidenlab.org/data.html. If you already have Hi-C data either in the form of a sparse upper triangular matrix or a full contact matrix you can skip to the creating the `hicexp`

object section. If you obtain data from the Aiden Lab in the `.hic`

format you will need to first extract the matrices that you wish to compare.

- Download the
`straw`

software from https://github.com/theaidenlab/straw/wiki and install it. - Use
`straw`

to extract a Hi-C sparse upper triangular matrix. An example is below:

Say we downloaded the `GSE63525_K562_combined_30.hic`

file from GEO https://www.ncbi.nlm.nih.gov/geo/query/acc.cgi?acc=GSE63525

To extract the raw matrix corresponding to chromosome 22 at 500kb resolution we would use the following command within the terminal

`./straw NONE GSE63525_K562_combined_30.hic 22 22 BP 500000 > K562.chHCT116_r22.500kb.txt`

This will extract the matrix from the `.hic`

file and save it to the `K562.chHCT116_r22.500kb.txt`

text file, in the sparse upper triangular matrix format. See more examples on on how to use `straw`

at https://github.com/theaidenlab/straw/wiki/CPP#running. Straw requires several inputs for the extraction of data from a `.hic`

file.

`<NONE/VC/VC_SQRT/KR> <hicFile(s)> <chr1>[:x1:x2] <chr2>[:y1:y2] <BP/FRAG> <binsize>`

The first argument is the normalization method. For use in `multiHiCcompare`

you want the raw data so you should selected `NONE`

. The second argument is the `.hic`

file name. Next is the chromosome numbers of the matrix you want. For an intrachromosomal contact map both should be the same as in the above example. If you want a matrix of interchromosomal interactions you can use different chromosomes i.e. interactions between chromosome 1 and chromosome 2 (Note that `HiCcompare`

is only meant to be used on intrachromosomal interactions at this point in development). The next argument is whether you want basepair or fragment files. For `multiHiCcompare`

use `BP`

. The final argument is the binsize of the matrix (the resolution). To extract a matrix at a resolution of 1MB enter `10000000`

. Typical bin sizes are 1MB, 500KB, 100KB, 50KB, 5KB, 1KB. Note that most matrices with resolutions higher than 100KB (i.e. matrices with resolutions of 1KB - 50KB) are typically too sparse (due to insufficient sequencing coverage) for analysis in `multiHiCcompare`

.

From here we can just import the matrix into R as you would normally for any tab-delimited file.

- Import the data into R
`K562.chr22 <- read.table('K562.chr22.500kb.txt', header=FALSE)`

- Repeat these steps for any other Hi-C dataset that you wish to compare to the first dataset using
`multiHiCcompare`

.

`.cool`

filesThe `cooler`

software, http://cooler.readthedocs.io/en/latest/index.html, allows access to a large collection of Hi-C data. The cooler index ftp://cooler.csail.mit.edu/coolers contains Hi-C data for `hg19`

and `mm9`

from many different sources. To use data in the `.cool`

format in `HiCcompare`

follow these steps:

- Download and install
`cooler`

from http://cooler.readthedocs.io/en/latest/index.html - Download a
`.cool`

file from the cooler index ftp://cooler.csail.mit.edu/coolers. - Say we downloaded the
`Dixon2012-H1hESC-HindIII-allreps-filtered.1000kb.cool`

file. See`cooler dump --help`

for data extraction options. To extract the contact matrix we use the following commands in the terminal:

`cooler dump --join Dixon2012-H1hESC-HindIII-allreps-filtered.1000kb.cool > dixon.hESC.1000kb.txt`

- Read in the text file as you would any tab-delimited file in R

`hesc1000kb <- read.table("dixon.hESC.1000kb.txt", header = FALSE)`

- Convert to a sparse upper triangular matrix using the
`HiCcompare::cooler2sparse`

function.

`sparse <- cooler2sparse(hesc1000kb)`

- Repeat the steps for another Hi-C dataset that you wish to compare to the first dataset.

HiC-Pro is another tool for processing raw Hi-C data into usable matrix files. HiC-Pro will produce a `.matrix`

file and a `.bed`

file for the data. These `.matrix`

files are in sparse upper triangular format similar to the results of Juicer and the dumped contents of a `.hic`

file, however instead of using the genomic start coordinates for the first two columns of the sparse matrix they use an ID number. The `.bed`

file contains the mappings for each of these IDs to their genomic coordinates. The original `HiCcompare`

includes a function to convert the results of HiC-Pro into a usable format for analysis in `multiHiCcompare`

. When using data from HiC-Pro it is important to use the raw `.matrix`

files and NOT the iced `.matrix`

files. The iced `.matrix`

files have already had ICE normalization applied to them and are not suitable for entry into `multiHiCcompare`

. Here we convert HiC-Pro data for input into `multiHiCcompare`

:

```
# read in files
mat <- read.table("hic_1000000.matrix")
bed <- read.table("hic_1000000_abs.bed")
# convert to BEDPE
dat <- HiCcompare::hicpro2bedpe(mat, bed)
# NOTE: hicpro2bedpe returns a list of lists.
# The first list, dat$cis, contains the intrachromosomal contact matrices
# NOTE: dat$trans contains the interchromosomal
# contact matrix which is not used in multiHiCcompare.
```

See the help using `?HiCcompare::hicpro2bedpe`

for more details.

Hi-C data is large, especially at high resolutions, and loess normalization is computationally intensive. `multiHiCcompare`

was built with parallelization in mind and the best performance when working with large Hi-C experiments (many samples or high resolution) will be achieved when using a computing cluster. Parallel processing can be used for all normalization and comparison functions by setting `parallel = TRUE`

in the function options. `multiHiCcompare`

uses the Bioconductor `BiocParallel`

package for parallel processing. You can set the number of processors to use on linux with the following command:

```
library(BiocParallel)
numCores <- 20
register(MulticoreParam(workers = numCores), default = TRUE)
```

Or on Windows with:

```
library(BiocParallel)
numCores <- 20
register(SnowParam(workers = numCores), default = TRUE)
```

where `numCores`

is the user-set number of processing cores to be used. For parallel processing in `multiHiCcompare`

, jobs are split by chromosome and sometimes distance thus the more processors used, the quicker the function will run. For maximum speed it is recommended to set `numCores`

to the maximum number of processors available.

`hicexp`

objectA sparse matrix format represents a relatively compact and human-readable way to store pair-wise interactions. It is a tab-delimited text format containing three columns: “region1” - a start coordinate (in bp) of the first region, “region2” a start coordinate of the second region, and “IF” - the interaction frequency between them (IFs). Zero IFs are dropped (hence, the *sparse* format). Since the full matrix of chromatin interactions is symmetric, only the upper triangular portion, including the diagonal, is stored. Typically matrices in this format are stored in their own separate text files for each chromosome. For use in `multiHiCcompare`

you will need to add an additional column for the chromosome number. The chromosome number should be entered as just the number. Chromosomes such as X, Y, etc. should be entered as 23, 24, etc. If you are planning to analyze data for more than a single chromosome you will need to concatenate these matrices together. A sparse Hi-C matrix ready to be input into `multiHiCcompare`

should look like the following:

```
data("HCT116_r1") # load example sparse matrix
head(HCT116_r1)
#> "22" V1 V2 V3
#> 1 22 16000000 16000000 11
#> 2 22 16100000 16100000 1
#> 3 22 16200000 16200000 3
#> 4 22 16300000 16300000 15
#> 5 22 16400000 16400000 3
#> 6 22 16400000 16500000 1
colnames(HCT116_r1) <- c('chr', 'region1', 'region2', 'IF') # rename columns
head(HCT116_r1) # matrix ready to be input into multiHiCcompare
#> chr region1 region2 IF
#> 1 22 16000000 16000000 11
#> 2 22 16100000 16100000 1
#> 3 22 16200000 16200000 3
#> 4 22 16300000 16300000 15
#> 5 22 16400000 16400000 3
#> 6 22 16400000 16500000 1
```

If you have full Hi-C contact matrices you can convert them to sparse upper triangular matrices using the `HiCcompare::full2sparse`

function and then add an additional column indicating the chromosome.

Say we have data from 2 experimental conditions with 2 samples each. We can make a `hicexp`

object by doing the following.

```
data("HCT116_r1", "HCT116_r2", "HCT116_r3", "HCT116_r4")
hicexp1 <- make_hicexp(HCT116_r1, HCT116_r2, HCT116_r3, HCT116_r4,
groups = c(0, 0, 1, 1),
zero.p = 0.8, A.min = 5, filter = TRUE,
remove.regions = hg19_cyto)
hicexp1
#> Hi-C Experiment Object
#> 2 experimental groups
#> Group 1 has 2 samples
#> Group 2 has 2 samples
```

The `groups`

option specifies the experimental groups. You must enter a vector the length of the number of Hi-C matrices with indicators for which group each matrix belongs to. An optional covariate `data.frame`

with rows corresponding the Hi-C matrices and columns for each additional covariate can be provided with the `covariates`

option.

Filtering can be performed when creating a `hicexp`

object using the `zero.p`

and `A.min`

options in the `make_hicexp`

function. The `zero.p`

option allows for filtering by the proportion of zero IFs for an interaction. The `A.min`

allows for filtering by a minimum average IF value. These options can be used together or individually to filter your data. Filtering is important to remove interactions with lots of 0 IFs and low average expression. These interactions tend to not be very interesting and can easily become a false positive during difference detection. Additionally, removing these interactions will increase the computational speed of `multiHiCcompare`

. If for some reason you do not want to filter the data simply set `filter = FALSE`

.

Additionally, you can filter out specific genomic regions such as centromeres or black listed regions. `multiHiCcompare`

comes with built in regions to be filtered for hg19 and hg38 which can be accessed like so.

```
data("hg19_cyto")
data("hg38_cyto")
hg19_cyto
#> GRanges object with 70 ranges and 2 metadata columns:
#> seqnames ranges strand | arm feature
#> <Rle> <IRanges> <Rle> | <factor> <factor>
#> [1] 1 121500000-125000000 * | p11.1 acen
#> [2] 1 125000000-128900000 * | q11 acen
#> [3] 1 128900000-142600000 * | q12 gvar
#> [4] 10 38000000-40200000 * | p11.1 acen
#> [5] 10 40200000-42300000 * | q11.1 acen
#> ... ... ... ... . ... ...
#> [66] 23 58100000-60600000 * | p11.1 acen
#> [67] 23 60600000-63000000 * | q11.1 acen
#> [68] 24 11600000-12500000 * | p11.1 acen
#> [69] 24 12500000-13400000 * | q11.1 acen
#> [70] 24 28800000-59373566 * | q12 gvar
#> -------
#> seqinfo: 24 sequences from an unspecified genome; no seqlengths
```

By default the `make_hicexp`

object will have the `remove.regions`

option set to use the `hg19_cyto`

object. If your data was not aligned to hg19 or you want other regions to be removed you can create a `GenomicRanges`

object containing the ranges to be removed and the `remove.regions`

option to this object.

`hicexp`

objectThe `hicexp`

S4 class has several slots which can be accessed with the accessor functions `hic_table()`

, `results()`

, and `meta()`

. The `hic_table`

slot contains the Hi-C matrix in sparse format. The first four columns are the chromosome, region1 start location, region2 start location, and unit distance. All following chromosomes represent the IFs for that interacting pair from each sample. The `comparison`

slot is empty at creation, but will be filled following use of one of the comparison functions. It contains the same first four columns as the `hic_table`

slot, but also has the logFC - log fold change between conditions, logCPM - log counts per million, p.value, and p.adj - multiple testing corrected p-value columns which indicate the significance of the difference for each interacting pair of regions between the conditions. Access the `comparison`

slot using `results()`

. The `metadata`

slot contains the `data.frame`

of covariates for the experiment. Access the `metadata`

slot by using `meta()`

. The other slots are mainly for internal use and the typical user does not need to be concerned with them.

`multiHiCcompare`

comes with a few methods for normalizing your Hi-C data. Our joint normalization methods are again based on the MD plot as in the original `HiCcompare`

. The MD plot is similar to the MA plot or the Bland-Altman plot. \(M\) is the \(log2\) difference between the interaction frequencies from the two datasets. \(D\) is the unit distance between the two interacting regions. Loess is performed on the data after it is represented in the MD coordinate system.

The simplest form of normalization for the purpose of comparing Hi-C data is library scaling. `multiHiCcompare`

provides the `hic_scale()`

function to scale the Hi-C libraries from each sample to the size of the smallest library. If you believe that any trends present in your data are important differences and not due to bias then you can use library scaling for normalizing your data. Otherwise it is recommended to use either cyclic loess or fast loess. You can perform library scaling as follows. Note that you need to pick a single normalization method. If you use `hic_scale`

you will not be able to use cyclic loess normalization.

```
data("hicexp2")
hicexp2 <- hic_scale(hicexp2)
```

`multiHiCcompare`

provides a cyclic loess method for the joint normalization of multiple Hi-C datasets. The method is based on representing the data on an MD plot. The MD plot is similar to the MA plot (Bland-Altman plot) which is commonly used for the visualization of gene expression differences. \(M\) is defined as the log difference between the two data sets \(M = log_2(IF_2/IF_1)\), where \(IF_1\) and \(IF_2\) are interaction frequencies of the first and the second Hi-C datasets, respectively. \(D\) is defined as the distance between two interacting regions, expressed in unit-length of the \(X\) resolution of the Hi-C data. A loess regression curve is fit through the MD plot and used to remove global biases by centering the \(M\) differences around \(M=0\) baseline.

The cyclic loess algorithm proceeds through the following steps.

- Choose two out of the \(N\) total samples then generate an MD plot.
- Fit a loess curve \(f(d)\) to the MD plot.
- Subtract \(f(d)/2\) from the first dataset and add \(f(d)/2\) to the second.
- Repeat until all unique pairs have been compared.
- Repeat until convergence.

To perform cyclic loess on your Hi-C data you will need to use the `cyclic_loess()`

function as shown below:

```
hicexp1 <- cyclic_loess(hicexp1, verbose = FALSE,
parallel = FALSE, span = 0.2)
# make MD plot
MD_hicexp(hicexp1)
```

As can be seen in the above MD plots, the data for each sample has been jointly normalized with all other samples. Note that the span option can be set by the user. A user set span will run quicker than the default option of automatically calculating the span. It is best to use the automatic span calculation if you have not worked with the data before, but if you are familiar with it then setting the span is a way to speed up processing. The `hic_table`

slot in the `hicexp`

object has also been updated with the normalized IFs.

```
hic_table(hicexp1)
#> chr region1 region2 D IF1 IF2 IF3 IF4
#> 1: 22 18000000 18000000 0 4848.93586 5117.56104 5757.67702 4330.37698
#> 2: 22 18000000 18100000 1 1307.53629 1128.57032 1317.91263 893.55501
#> 3: 22 18000000 18200000 2 715.99832 734.05089 729.32691 743.67190
#> 4: 22 18000000 18300000 3 352.17410 409.94247 420.22430 387.50225
#> 5: 22 18000000 18400000 4 296.77137 274.80602 306.21630 314.82774
#> ---
#> 43740: 22 51000000 51100000 1 1622.03802 1762.87853 1664.49400 1271.16626
#> 43741: 22 51000000 51200000 2 30.51641 35.06727 31.06704 22.70308
#> 43742: 22 51100000 51100000 0 3681.72778 4131.14202 4126.33930 3604.34388
#> 43743: 22 51100000 51200000 1 79.15003 63.50592 77.51615 57.56003
#> 43744: 22 51200000 51200000 0 17.19701 25.33298 28.78896 36.23247
```

The run time of cyclic loess can be decreased when multiple processors are available by setting the `parallel`

option to `TRUE`

. This option splits up the data by chromosome and sends each chromosome’s data to a parallel processor.

In addition to the standard cyclic loess method, `multiHiCcompare`

also implements the Fast Loess (Fastlo) joint normalization algorithm. Our implementation of fastlo is adapted to Hi-C data on a per-distance basis. To perform “fastlo” on Hi-C data we first split the data into \(p\) pooled matrices. The “progressive pooling” is used to split up the Hi-C matrix by unit distance such that distance 0 is its own pool, distances 1 and 2 are pooled, distance 3, 4, 5 are pooled, and so on until all unit distances belong to one of \(p\) pools. Each matrix will have an \(IF_{gj}\) value with \(g\) interacting pairs for each of the \(j\) samples. These \(p\) matrices can then be input into the “fastlo” algorithm using the following steps.

- Create the vector \(\hat{IF}_{pgj}\), the row means of the \(p^{th}\) matrix. This is the equivalent of creating an average IF at distance pool \(p\).
- Plot \(\hat{IF}_{p}\) versus \((IF_{pg} - \hat{IF_p})\) for each sample \(j\). This is equivalent to an MA plot at a genomic distance pool \(p\).
- Fit a loess curve \(f(x)\) to the plot.
- Subtract \(f(x)\) from sample \(j\).
- Repeat for all remaining replicates.
- Repeat until algorithm converges.

You can perform fastlo normalization on your data as follows:

```
data("hicexp2")
# perform fastlo normalization
hicexp2 <- fastlo(hicexp2, verbose = FALSE, parallel = FALSE)
# make MD plot
MD_hicexp(hicexp2)
```

Again, the above MD plots show the normalized data. `fastlo()`

can also make use of parallelization to speed up computation speeds by setting the `parallel`

option to `TRUE`

. The results of `fastlo()`

and `cyclic_loess()`

may be slightly different, but both should result in the removal of biases between Hi-C datasets. `fastlo()`

will have quicker run times compared to `cyclic_loess()`

, but `cyclic_loess()`

will likely give a slightly better normalization.

`multiHiCcompare`

provides two main ways to perform a differential comparison between the groups or conditions of your Hi-C experiment. For simple experiments where only a comparison between two groups is being made, the `hic_exactTest()`

function can be used. For more complex experiments with covariates or multiple groups, the `hic_glm()`

function should be used. Both of these functions make use of the `edgeR`

package for fitting negative binomial models to the Hi-C data. For the difference detection steps, `multiHiCcompare`

first splits the data up by distance using the progressive pooling described in the fastlo section. Each distance pool is then treated similar to an independent RNA-seq data matrix on which `edgeR`

’s functions are applied to fit the specified model. This process is illustrated in Figure 1 below.