MACSr

Introduction

With the improvement of sequencing techniques, chromatin immunoprecipitation followed by high throughput sequencing (ChIP-Seq) is getting popular to study genome-wide protein-DNA interactions. To address the lack of powerful ChIP-Seq analysis method, we presented the Model-based Analysis of ChIP-Seq (MACS), for identifying transcript factor binding sites. MACS captures the influence of genome complexity to evaluate the significance of enriched ChIP regions and MACS improves the spatial resolution of binding sites through combining the information of both sequencing tag position and orientation. MACS can be easily used for ChIP-Seq data alone, or with a control sample with the increase of specificity. Moreover, as a general peak-caller, MACS can also be applied to any “DNA enrichment assays” if the question to be asked is simply: where we can find significant reads coverage than the random background.

This package is a wrapper of the MACS toolkit based on basilisk.

Load the package

The package is built on basilisk. The dependent python library macs3 will be installed automatically inside its conda environment.

library(MACSr)

Usage

MACS3 functions

There are 13 functions imported from MACS3. Details of each function can be checked from its manual.

Functions Description
callpeak Main MACS3 Function to call peaks from alignment results.
bdgpeakcall Call peaks from bedGraph output.
bdgbroadcall Call broad peaks from bedGraph output.
bdgcmp Comparing two signal tracks in bedGraph format.
bdgopt Operate the score column of bedGraph file.
cmbreps Combine BEDGraphs of scores from replicates.
bdgdiff Differential peak detection based on paired four bedGraph files.
filterdup Remove duplicate reads, then save in BED/BEDPE format.
predictd Predict d or fragment size from alignment results.
pileup Pileup aligned reads (single-end) or fragments (paired-end)
randsample Randomly choose a number/percentage of total reads.
refinepeak Take raw reads alignment, refine peak summits.
callvar Call variants in given peak regions from the alignment BAM files.
hmmratac Dedicated peak calling based on Hidden Markov Model for ATAC-seq data.

Function callpeak

We have uploaded multipe test datasets from MACS to a data package MACSdata in the ExperimentHub. For example, Here we download a pair of single-end bed files to run the callpeak function.

eh <- ExperimentHub::ExperimentHub()
eh <- AnnotationHub::query(eh, "MACSdata")
CHIP <- eh[["EH4558"]]
#> see ?MACSdata and browseVignettes('MACSdata') for documentation
#> downloading 1 resources
#> retrieving 1 resource
#> loading from cache
CTRL <- eh[["EH4563"]]
#> see ?MACSdata and browseVignettes('MACSdata') for documentation
#> downloading 1 resources
#> retrieving 1 resource
#> loading from cache

Here is an example to call narrow and broad peaks on the SE bed files.

cp1 <- callpeak(CHIP, CTRL, gsize = 5.2e7, store_bdg = TRUE,
                name = "run_callpeak_narrow0", outdir = tempdir(),
                cutoff_analysis = TRUE)
#> + /github/home/.cache/R/basilisk/1.19.0/0/bin/conda create --yes --prefix /github/home/.cache/R/basilisk/1.19.0/MACSr/1.15.0/env_macs 'python=3.10' --quiet -c conda-forge --override-channels
#> + /github/home/.cache/R/basilisk/1.19.0/0/bin/conda install --yes --prefix /github/home/.cache/R/basilisk/1.19.0/MACSr/1.15.0/env_macs 'python=3.10' -c conda-forge --override-channels
#> + /github/home/.cache/R/basilisk/1.19.0/0/bin/conda install --yes --prefix /github/home/.cache/R/basilisk/1.19.0/MACSr/1.15.0/env_macs -c conda-forge 'python=3.10' 'python=3.10' --override-channels
#> INFO  @ 30 Oct 2024 07:42:58: [663 MB] 
#> # Command line: 
#> # ARGUMENTS LIST:
#> # name = run_callpeak_narrow0
#> # format = AUTO
#> # ChIP-seq file = ['/github/home/.cache/R/ExperimentHub/15b41ef47b18_4601']
#> # control file = ['/github/home/.cache/R/ExperimentHub/15b443c7ee4e_4606']
#> # effective genome size = 5.20e+07
#> # band width = 300
#> # model fold = [5.0, 50.0]
#> # qvalue cutoff = 5.00e-02
#> # The maximum gap between significant sites is assigned as the read length/tag size.
#> # The minimum length of peaks is assigned as the predicted fragment length "d".
#> # Larger dataset will be scaled towards smaller dataset.
#> # Range for calculating regional lambda is: 1000 bps and 10000 bps
#> # Broad region calling is off
#> # Additional cutoff on fold-enrichment is: 0.10
#> # Paired-End mode is off
#>  
#> INFO  @ 30 Oct 2024 07:42:58: [663 MB] #1 read tag files... 
#> INFO  @ 30 Oct 2024 07:42:58: [663 MB] #1 read treatment tags... 
#> INFO  @ 30 Oct 2024 07:42:58: [670 MB] Detected format is: BED 
#> INFO  @ 30 Oct 2024 07:42:58: [670 MB] * Input file is gzipped. 
#> INFO  @ 30 Oct 2024 07:42:58: [675 MB] #1.2 read input tags... 
#> INFO  @ 30 Oct 2024 07:42:58: [675 MB] Detected format is: BED 
#> INFO  @ 30 Oct 2024 07:42:58: [675 MB] * Input file is gzipped. 
#> INFO  @ 30 Oct 2024 07:42:58: [675 MB] #1 tag size is determined as 101 bps 
#> INFO  @ 30 Oct 2024 07:42:58: [675 MB] #1 tag size = 101.0 
#> INFO  @ 30 Oct 2024 07:42:58: [675 MB] #1  total tags in treatment: 49622 
#> INFO  @ 30 Oct 2024 07:42:58: [675 MB] #1 user defined the maximum tags... 
#> INFO  @ 30 Oct 2024 07:42:58: [675 MB] #1 filter out redundant tags at the same location and the same strand by allowing at most 1 tag(s) 
#> INFO  @ 30 Oct 2024 07:42:58: [675 MB] #1  tags after filtering in treatment: 48047 
#> INFO  @ 30 Oct 2024 07:42:58: [675 MB] #1  Redundant rate of treatment: 0.03 
#> INFO  @ 30 Oct 2024 07:42:58: [675 MB] #1  total tags in control: 50837 
#> INFO  @ 30 Oct 2024 07:42:58: [675 MB] #1 user defined the maximum tags... 
#> INFO  @ 30 Oct 2024 07:42:58: [675 MB] #1 filter out redundant tags at the same location and the same strand by allowing at most 1 tag(s) 
#> INFO  @ 30 Oct 2024 07:42:58: [675 MB] #1  tags after filtering in control: 50783 
#> INFO  @ 30 Oct 2024 07:42:58: [675 MB] #1  Redundant rate of control: 0.00 
#> INFO  @ 30 Oct 2024 07:42:58: [675 MB] #1 finished! 
#> INFO  @ 30 Oct 2024 07:42:58: [675 MB] #2 Build Peak Model... 
#> INFO  @ 30 Oct 2024 07:42:58: [675 MB] #2 looking for paired plus/minus strand peaks... 
#> INFO  @ 30 Oct 2024 07:42:58: [675 MB] #2 Total number of paired peaks: 469 
#> INFO  @ 30 Oct 2024 07:42:58: [675 MB] #2 Model building with cross-correlation: Done 
#> INFO  @ 30 Oct 2024 07:42:58: [675 MB] #2 finished! 
#> INFO  @ 30 Oct 2024 07:42:58: [675 MB] #2 predicted fragment length is 228 bps 
#> INFO  @ 30 Oct 2024 07:42:58: [675 MB] #2 alternative fragment length(s) may be 228 bps 
#> INFO  @ 30 Oct 2024 07:42:58: [675 MB] #2.2 Generate R script for model : /tmp/Rtmph5cbW7/run_callpeak_narrow0_model.r 
#> INFO  @ 30 Oct 2024 07:42:58: [675 MB] #3 Call peaks... 
#> INFO  @ 30 Oct 2024 07:42:58: [675 MB] #3 Pre-compute pvalue-qvalue table... 
#> INFO  @ 30 Oct 2024 07:42:58: [675 MB] #3 Cutoff vs peaks called will be analyzed! 
#> INFO  @ 30 Oct 2024 07:42:58: [692 MB] #3 Analysis of cutoff vs num of peaks or total length has been saved in b'/tmp/Rtmph5cbW7/run_callpeak_narrow0_cutoff_analysis.txt' 
#> INFO  @ 30 Oct 2024 07:42:58: [692 MB] #3 In the peak calling step, the following will be performed simultaneously: 
#> INFO  @ 30 Oct 2024 07:42:58: [692 MB] #3   Write bedGraph files for treatment pileup (after scaling if necessary)... run_callpeak_narrow0_treat_pileup.bdg 
#> INFO  @ 30 Oct 2024 07:42:58: [692 MB] #3   Write bedGraph files for control lambda (after scaling if necessary)... run_callpeak_narrow0_control_lambda.bdg 
#> INFO  @ 30 Oct 2024 07:42:58: [692 MB] #3   Pileup will be based on sequencing depth in treatment. 
#> INFO  @ 30 Oct 2024 07:42:58: [692 MB] #3 Call peaks for each chromosome... 
#> INFO  @ 30 Oct 2024 07:42:59: [693 MB] #4 Write output xls file... /tmp/Rtmph5cbW7/run_callpeak_narrow0_peaks.xls 
#> INFO  @ 30 Oct 2024 07:42:59: [693 MB] #4 Write peak in narrowPeak format file... /tmp/Rtmph5cbW7/run_callpeak_narrow0_peaks.narrowPeak 
#> INFO  @ 30 Oct 2024 07:42:59: [694 MB] #4 Write summits bed file... /tmp/Rtmph5cbW7/run_callpeak_narrow0_summits.bed 
#> INFO  @ 30 Oct 2024 07:42:59: [694 MB] Done!
cp2 <- callpeak(CHIP, CTRL, gsize = 5.2e7, store_bdg = TRUE,
                name = "run_callpeak_broad", outdir = tempdir(),
                broad = TRUE)
#> 

Here are the outputs.

cp1
#> macsList class
#> $outputs:
#>  /tmp/Rtmph5cbW7/run_callpeak_narrow0_control_lambda.bdg
#>  /tmp/Rtmph5cbW7/run_callpeak_narrow0_cutoff_analysis.txt
#>  /tmp/Rtmph5cbW7/run_callpeak_narrow0_model.r
#>  /tmp/Rtmph5cbW7/run_callpeak_narrow0_peaks.narrowPeak
#>  /tmp/Rtmph5cbW7/run_callpeak_narrow0_peaks.xls
#>  /tmp/Rtmph5cbW7/run_callpeak_narrow0_summits.bed
#>  /tmp/Rtmph5cbW7/run_callpeak_narrow0_treat_pileup.bdg 
#> $arguments: tfile, cfile, gsize, outdir, name, store_bdg, cutoff_analysis 
#> $log:
#>  INFO  @ 30 Oct 2024 07:42:58: [663 MB] 
#>  # Command line: 
#>  # ARGUMENTS LIST:
#>  # name = run_callpeak_narrow0
#>  # format = AUTO
#> ...
cp2
#> macsList class
#> $outputs:
#>  /tmp/Rtmph5cbW7/run_callpeak_broad_control_lambda.bdg
#>  /tmp/Rtmph5cbW7/run_callpeak_broad_model.r
#>  /tmp/Rtmph5cbW7/run_callpeak_broad_peaks.broadPeak
#>  /tmp/Rtmph5cbW7/run_callpeak_broad_peaks.gappedPeak
#>  /tmp/Rtmph5cbW7/run_callpeak_broad_peaks.xls
#>  /tmp/Rtmph5cbW7/run_callpeak_broad_treat_pileup.bdg 
#> $arguments: tfile, cfile, gsize, outdir, name, store_bdg, broad 
#> $log:
#> 

The macsList class

The macsList is designed to contain everything of an execution, including function, inputs, outputs and logs, for the purpose of reproducibility.

For example, we can the function and input arguments.

cp1$arguments
#> [[1]]
#> callpeak
#> 
#> $tfile
#> CHIP
#> 
#> $cfile
#> CTRL
#> 
#> $gsize
#> [1] 5.2e+07
#> 
#> $outdir
#> tempdir()
#> 
#> $name
#> [1] "run_callpeak_narrow0"
#> 
#> $store_bdg
#> [1] TRUE
#> 
#> $cutoff_analysis
#> [1] TRUE

The files of all the outputs are collected.

cp1$outputs
#> [1] "/tmp/Rtmph5cbW7/run_callpeak_narrow0_control_lambda.bdg" 
#> [2] "/tmp/Rtmph5cbW7/run_callpeak_narrow0_cutoff_analysis.txt"
#> [3] "/tmp/Rtmph5cbW7/run_callpeak_narrow0_model.r"            
#> [4] "/tmp/Rtmph5cbW7/run_callpeak_narrow0_peaks.narrowPeak"   
#> [5] "/tmp/Rtmph5cbW7/run_callpeak_narrow0_peaks.xls"          
#> [6] "/tmp/Rtmph5cbW7/run_callpeak_narrow0_summits.bed"        
#> [7] "/tmp/Rtmph5cbW7/run_callpeak_narrow0_treat_pileup.bdg"

The log is especially important for MACS to check. Detailed information was given in the log when running.

cat(paste(cp1$log, collapse="\n"))
#> INFO  @ 30 Oct 2024 07:42:58: [663 MB] 
#> # Command line: 
#> # ARGUMENTS LIST:
#> # name = run_callpeak_narrow0
#> # format = AUTO
#> # ChIP-seq file = ['/github/home/.cache/R/ExperimentHub/15b41ef47b18_4601']
#> # control file = ['/github/home/.cache/R/ExperimentHub/15b443c7ee4e_4606']
#> # effective genome size = 5.20e+07
#> # band width = 300
#> # model fold = [5.0, 50.0]
#> # qvalue cutoff = 5.00e-02
#> # The maximum gap between significant sites is assigned as the read length/tag size.
#> # The minimum length of peaks is assigned as the predicted fragment length "d".
#> # Larger dataset will be scaled towards smaller dataset.
#> # Range for calculating regional lambda is: 1000 bps and 10000 bps
#> # Broad region calling is off
#> # Additional cutoff on fold-enrichment is: 0.10
#> # Paired-End mode is off
#>  
#> INFO  @ 30 Oct 2024 07:42:58: [663 MB] #1 read tag files... 
#> INFO  @ 30 Oct 2024 07:42:58: [663 MB] #1 read treatment tags... 
#> INFO  @ 30 Oct 2024 07:42:58: [670 MB] Detected format is: BED 
#> INFO  @ 30 Oct 2024 07:42:58: [670 MB] * Input file is gzipped. 
#> INFO  @ 30 Oct 2024 07:42:58: [675 MB] #1.2 read input tags... 
#> INFO  @ 30 Oct 2024 07:42:58: [675 MB] Detected format is: BED 
#> INFO  @ 30 Oct 2024 07:42:58: [675 MB] * Input file is gzipped. 
#> INFO  @ 30 Oct 2024 07:42:58: [675 MB] #1 tag size is determined as 101 bps 
#> INFO  @ 30 Oct 2024 07:42:58: [675 MB] #1 tag size = 101.0 
#> INFO  @ 30 Oct 2024 07:42:58: [675 MB] #1  total tags in treatment: 49622 
#> INFO  @ 30 Oct 2024 07:42:58: [675 MB] #1 user defined the maximum tags... 
#> INFO  @ 30 Oct 2024 07:42:58: [675 MB] #1 filter out redundant tags at the same location and the same strand by allowing at most 1 tag(s) 
#> INFO  @ 30 Oct 2024 07:42:58: [675 MB] #1  tags after filtering in treatment: 48047 
#> INFO  @ 30 Oct 2024 07:42:58: [675 MB] #1  Redundant rate of treatment: 0.03 
#> INFO  @ 30 Oct 2024 07:42:58: [675 MB] #1  total tags in control: 50837 
#> INFO  @ 30 Oct 2024 07:42:58: [675 MB] #1 user defined the maximum tags... 
#> INFO  @ 30 Oct 2024 07:42:58: [675 MB] #1 filter out redundant tags at the same location and the same strand by allowing at most 1 tag(s) 
#> INFO  @ 30 Oct 2024 07:42:58: [675 MB] #1  tags after filtering in control: 50783 
#> INFO  @ 30 Oct 2024 07:42:58: [675 MB] #1  Redundant rate of control: 0.00 
#> INFO  @ 30 Oct 2024 07:42:58: [675 MB] #1 finished! 
#> INFO  @ 30 Oct 2024 07:42:58: [675 MB] #2 Build Peak Model... 
#> INFO  @ 30 Oct 2024 07:42:58: [675 MB] #2 looking for paired plus/minus strand peaks... 
#> INFO  @ 30 Oct 2024 07:42:58: [675 MB] #2 Total number of paired peaks: 469 
#> INFO  @ 30 Oct 2024 07:42:58: [675 MB] #2 Model building with cross-correlation: Done 
#> INFO  @ 30 Oct 2024 07:42:58: [675 MB] #2 finished! 
#> INFO  @ 30 Oct 2024 07:42:58: [675 MB] #2 predicted fragment length is 228 bps 
#> INFO  @ 30 Oct 2024 07:42:58: [675 MB] #2 alternative fragment length(s) may be 228 bps 
#> INFO  @ 30 Oct 2024 07:42:58: [675 MB] #2.2 Generate R script for model : /tmp/Rtmph5cbW7/run_callpeak_narrow0_model.r 
#> INFO  @ 30 Oct 2024 07:42:58: [675 MB] #3 Call peaks... 
#> INFO  @ 30 Oct 2024 07:42:58: [675 MB] #3 Pre-compute pvalue-qvalue table... 
#> INFO  @ 30 Oct 2024 07:42:58: [675 MB] #3 Cutoff vs peaks called will be analyzed! 
#> INFO  @ 30 Oct 2024 07:42:58: [692 MB] #3 Analysis of cutoff vs num of peaks or total length has been saved in b'/tmp/Rtmph5cbW7/run_callpeak_narrow0_cutoff_analysis.txt' 
#> INFO  @ 30 Oct 2024 07:42:58: [692 MB] #3 In the peak calling step, the following will be performed simultaneously: 
#> INFO  @ 30 Oct 2024 07:42:58: [692 MB] #3   Write bedGraph files for treatment pileup (after scaling if necessary)... run_callpeak_narrow0_treat_pileup.bdg 
#> INFO  @ 30 Oct 2024 07:42:58: [692 MB] #3   Write bedGraph files for control lambda (after scaling if necessary)... run_callpeak_narrow0_control_lambda.bdg 
#> INFO  @ 30 Oct 2024 07:42:58: [692 MB] #3   Pileup will be based on sequencing depth in treatment. 
#> INFO  @ 30 Oct 2024 07:42:58: [692 MB] #3 Call peaks for each chromosome... 
#> INFO  @ 30 Oct 2024 07:42:59: [693 MB] #4 Write output xls file... /tmp/Rtmph5cbW7/run_callpeak_narrow0_peaks.xls 
#> INFO  @ 30 Oct 2024 07:42:59: [693 MB] #4 Write peak in narrowPeak format file... /tmp/Rtmph5cbW7/run_callpeak_narrow0_peaks.narrowPeak 
#> INFO  @ 30 Oct 2024 07:42:59: [694 MB] #4 Write summits bed file... /tmp/Rtmph5cbW7/run_callpeak_narrow0_summits.bed 
#> INFO  @ 30 Oct 2024 07:42:59: [694 MB] Done!

Resources

More details about MACS3 can be found: https://macs3-project.github.io/MACS/.

SessionInfo

sessionInfo()
#> R version 4.4.1 (2024-06-14)
#> Platform: x86_64-pc-linux-gnu
#> Running under: Ubuntu 24.04.1 LTS
#> 
#> Matrix products: default
#> BLAS:   /usr/lib/x86_64-linux-gnu/openblas-pthread/libblas.so.3 
#> LAPACK: /usr/lib/x86_64-linux-gnu/openblas-pthread/libopenblasp-r0.3.26.so;  LAPACK version 3.12.0
#> 
#> 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       
#> 
#> time zone: Etc/UTC
#> tzcode source: system (glibc)
#> 
#> attached base packages:
#> [1] stats     graphics  grDevices utils     datasets  methods   base     
#> 
#> other attached packages:
#> [1] MACSdata_1.13.0  MACSr_1.15.0     BiocStyle_2.35.0
#> 
#> loaded via a namespace (and not attached):
#>  [1] KEGGREST_1.45.1         dir.expiry_1.13.1       xfun_0.48              
#>  [4] bslib_0.8.0             Biobase_2.67.0          lattice_0.22-6         
#>  [7] vctrs_0.6.5             tools_4.4.1             generics_0.1.3         
#> [10] stats4_4.4.1            curl_5.2.3              parallel_4.4.1         
#> [13] tibble_3.2.1            fansi_1.0.6             AnnotationDbi_1.69.0   
#> [16] RSQLite_2.3.7           blob_1.2.4              pkgconfig_2.0.3        
#> [19] Matrix_1.7-1            dbplyr_2.5.0            S4Vectors_0.43.2       
#> [22] GenomeInfoDbData_1.2.13 lifecycle_1.0.4         compiler_4.4.1         
#> [25] Biostrings_2.75.0       GenomeInfoDb_1.41.2     htmltools_0.5.8.1      
#> [28] sys_3.4.3               buildtools_1.0.0        sass_0.4.9             
#> [31] yaml_2.3.10             pillar_1.9.0            crayon_1.5.3           
#> [34] jquerylib_0.1.4         cachem_1.1.0            mime_0.12              
#> [37] ExperimentHub_2.13.1    AnnotationHub_3.15.0    basilisk_1.19.0        
#> [40] tidyselect_1.2.1        digest_0.6.37           purrr_1.0.2            
#> [43] dplyr_1.1.4             BiocVersion_3.21.1      maketools_1.3.1        
#> [46] fastmap_1.2.0           grid_4.4.1              cli_3.6.3              
#> [49] magrittr_2.0.3          utf8_1.2.4              withr_3.0.2            
#> [52] filelock_1.0.3          UCSC.utils_1.1.0        rappdirs_0.3.3         
#> [55] bit64_4.5.2             rmarkdown_2.28          XVector_0.45.0         
#> [58] httr_1.4.7              bit_4.5.0               reticulate_1.39.0      
#> [61] png_0.1-8               memoise_2.0.1           evaluate_1.0.1         
#> [64] knitr_1.48              IRanges_2.39.2          basilisk.utils_1.19.0  
#> [67] BiocFileCache_2.15.0    rlang_1.1.4             Rcpp_1.0.13            
#> [70] glue_1.8.0              DBI_1.2.3               BiocManager_1.30.25    
#> [73] BiocGenerics_0.53.0     jsonlite_1.8.9          R6_2.5.1               
#> [76] zlibbioc_1.51.2