inst/syntheticProfiles/sawtooth.R

library(jointseg)

## Load original data
dat <- loadCnRegionData(tumorFraction=1, dataSet="GSE29172")

## Length of simulated profile
n <- 100000

## Profile generation 
sim <- getCopyNumberDataByResampling(n, 50, minLength=100, regData=dat)
plotSeg(sim$profile, sim$bkp)

Try the jointseg package in your browser

Any scripts or data that you put into this service are public.

jointseg documentation built on May 2, 2019, 6:10 a.m.