# Load some data
data("recoup_test_data",package="recoup")
# Do some work
testGenomeRanges <- makeGRangesFromDataFrame(df=test.genome,
keep.extra.columns=TRUE)
test.input <- coverageRef(
test.input,
genomeRanges=testGenomeRanges,
region="tss",
flank=c(2000,2000)
)
test.input <- profileMatrix(
test.input,
flank=c(2000,2000),
binParams=list(flankBinSize=50,regionBinSize=150,
sumStat="mean",smooth=TRUE),
rc=0.5
)
Run the code above in your browser using DataLab