data(genoset,package="genoset")
seg.list = runCBS( genoset.ds[, , "lrr"], rowRanges(genoset.ds), return.segs=TRUE )
df = segs2RleDataFrame( seg.list, rowRanges(genoset.ds) ) # Loop segs2Rle on list of data.frames in seg.list
genoset.ds[ , , "lrr.segs"] = df
segTable( df, rowRanges(genoset.ds) )
segTable( genoset.ds[ , , "lrr.segs"], rowRanges(genoset.ds) )
segTable( genoset.ds[ , 1, "lrr.segs"], rowRanges(genoset.ds), colnames(genoset.ds)[1] )
Run the code above in your browser using DataLab