# NOT RUN {
# Load loops into LoopRanges object
ovary_loops <- system.file("extdata/loops", "ovary_hg19.bedpe",
package = "LoopRig", mustWork = TRUE)
spleen_loops <- system.file("extdata/loops", "spleen_hg19.bedpe",
package = "LoopRig", mustWork = TRUE)
LoopsToRanges(ovary_loops, spleen_loops, custom_cols = 0)
# }
Run the code above in your browser using DataLab