data(seq.data)
## Not run:
# seq.segs <- joint.segmentation(data=seq.data, min.snps=10,
# global.pval.cutoff=1e-4, max.chpts=30,
# verbose=TRUE)
# ## End(Not run)
## how the joint segmentation results look like
data(seq.segs)
head(seq.segs)
Run the code above in your browser using DataLab