if(interactive()){
    library(MMDiffBamSubset)
    peaksA=toGRanges(WT.AB2.Peaks(), format="MACS")
    peaksB=toGRanges(Resc.AB2.Peaks(), format="MACS")
    bamfileA=WT.AB2()
    bamfileB=Resc.AB2()
    IDRfilter(peaksA, peaksB,
              bamfileA, bamfileB)
  }
Run the code above in your browser using DataLab