# Load some data
data("recoup_test_data",package="recoup")
# Calculate coverages
testGenomeRanges <- makeGRangesFromDataFrame(df=test.genome,
keep.extra.columns=TRUE)
test.input <- coverageRef(
test.input,
genomeRanges=testGenomeRanges,
region="tss",
flank=c(2000,2000)
)
Run the code above in your browser using DataLab