dataPath <- system.file("data",package="SimBindProfiles")
load(file.path(dataPath,"SGR.RData"))
overcompBC <- increasedBindingRegions(SGR, sgrset=c(2,3), bound.cutoff=1.86, diff.cutoff=1.4,
probes=10, probe.max.spacing=200)
Run the code above in your browser using DataLab