#load data
data(CNOlistToy,package="CellNOptR")
data(ToyModel,package="CellNOptR")
#pre-process model
model = preprocessing(CNOlistToy, ToyModel)
cutAndPlot(CNOlistToy, model,
bStrings=list(rep(1,length(model$reacID))), plotPDF=FALSE)
Run the code above in your browser using DataLab