losses = 0.15 * groups.level$bodymasses^(-0.25)
# define metbolic types:
met.types = rep('animal', length(losses))
met.types[groups.level$efficiencies == 0.545] = 'plant'
val.mat = fluxing(groups.level$mat,
groups.level$biomasses,
losses,
groups.level$efficiencies,
bioms.pref = TRUE,
ef.level = "pred")
stability.value(val.mat,
groups.level$biomasses,
groups.level$efficiencies,
metabolic.types = met.types,
ef.level = "pred")
Run the code above in your browser using DataLab