# NOT RUN {
load(system.file("extdata", "example_cn_list.RData",
package = "sigminer", mustWork = TRUE
))
segTabs <- data.table::rbindlist(tcga_segTabs, idcol = "sample")
segTabs$chromosome <- paste0("chr", segTabs$chromosome)
samp_sum <- get_cnsummary_sample(segTabs[, c(2:5, 1)])
# }
Run the code above in your browser using DataLab