## Not run:
# #The object has been generated using the following commands:
# ##### STEP1: create DBA object:
#
# library('MMDiffBamSubset')
# oldwd <- setwd(system.file("extdata", package="MMDiffBamSubset"))
#
# Cfp1 <- dba(sampleSheet="Cfp1.csv", minOverlap=3,
# config = data.frame(RunParallel=FALSE))
#
# ##### STEP2: compute histograms from bam files
#
# bin.length <- 50
# Peaks <- dba.peakset(Cfp1,bRetrieve=TRUE)
# Peaks <- Peaks[1:1000]
# Cfp1Profiles <- getPeakProfiles(Cfp1,Peaks,bin.length=bin.length,
# save.files=FALSE,run.parallel=FALSE)
# setwd(oldwd)
# ## End(Not run)
Run the code above in your browser using DataLab