# NOT RUN {
library(sybilccFBA)
data(iAF1260)
model= iAF1260
data(mw)
data(kcat)
mod2=mod2irrev(model)
uppbnd(mod2)[react_id(mod2)=="R_EX_glc_e__b"]=1000
uppbnd(mod2)[react_id(mod2)=="R_EX_glyc_e__b"]=0
uppbnd(mod2)[react_id(mod2)=="R_EX_ac_e__b"]=0
uppbnd(mod2)[react_id(mod2)=="R_EX_o2_e__b"]=1000
lowbnd(mod2)[react_id(mod2)=="R_ATPM"]=0
sol_mr=cfba_moment_mr(model,mod2,kcat,MW=mw,verbose=2,RHS=0.27,solver="glpkAPI",medval=3600*22.6)
bm_rxn = which(obj_coef(mod2)!=0)
print(sprintf('biomass=%f',sol_mr$sol$fluxes[bm_rxn]))
# Enzyme concentrations:
gconc=sol_mr$geneConc
# }
# NOT RUN {
<!-- % end dontrun -->
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab