# Load some data
data("recoup_test_data",package="recoup")
# Calculate coverage Rle
mask <- makeGRangesFromDataFrame(df=test.genome,
keep.extra.columns=TRUE)
small.cov <- calcCoverage(test.input[[1]]$ranges,mask)
Run the code above in your browser using DataLab