data(example_QCexperiment)
CTCFcoverage = crosscoverage(QCsample(exampleExp,1))
length(CTCFcoverage)
plot(CTCFcoverage,type='l',
ylab="Cross-coverage",
xlab="Fragment length")
allcoverages = crosscoverage(exampleExp)
dim(allcoverages)
for(i in 1:ncol(allcoverages)) lines(allcoverages[,i],col=i)
Run the code above in your browser using DataLab