library(GenomicRanges)
grl <- GRangesList(GRanges("chr1", IRanges(5, 10)),
GRanges("chr18", IRanges(25, 50)),
GRanges("chr22", IRanges(1, 100)))
antibody <- c("MeDIP", "MeDIP", "H3K4me3")
mergeReplicates(grl, antibody)
Run the code above in your browser using DataLab