data(examplePosets)
## An object of class oncosimul
p705 <- examplePosets[["p705"]]
p1 <- oncoSimulIndiv(p705)
class(p1)
lp1 <- OncoSimulWide2Long(p1)
head(lp1)
summary(lp1)
## An object of class oncosimul2
data(examplesFitnessEffects)
sm <- oncoSimulIndiv(examplesFitnessEffects$cbn1,
model = "McFL",
mu = 5e-7,
detectionSize = 1e8,
detectionDrivers = 2,
sampleEvery = 0.025,
keepEvery = 5,
initSize = 2000,
onlyCancer = FALSE)
class(sm)
lsm <- OncoSimulWide2Long(sm)
head(lsm)
summary(lsm)
Run the code above in your browser using DataLab