# This will compute the output of a random model obtained by randomly selecting
# which gates of the initial models are included.
data(CNOlistToy,package="CellNOptR")
data(ToyModel,package="CellNOptR")
simRes<-simulateTN(
CNOlist=CNOlistToy,
model=ToyModel,
bStrings=list(round(runif(length(ToyModel$reacID)))))
Run the code above in your browser using DataLab