## Not run:
# data(Wilting)
# rawcgh <- make_cghSeg(Wilting)
# normalized <- normalize(rawcgh)
# segmented <- segmentData(normalized)
# called <- CGHcall(segmented,cellularity= rep(0.75, 3))
# frequencyPlotCalls(called)
# ## End(Not run)
Run the code above in your browser using DataLab