View source: R/rate_functions.R
getEGrowth | R Documentation |
Calculates the energy rate g_i(w)
(grams/year) available by species and
size for growth after metabolism, movement and reproduction have been
accounted for.
getEGrowth(
params,
n = initialN(params),
n_pp = initialNResource(params),
n_other = initialNOther(params),
t = 0,
...
)
params |
A MizerParams object |
n |
A matrix of species abundances (species x size). |
n_pp |
A vector of the resource abundance by size |
n_other |
A list of abundances for other dynamical components of the ecosystem |
t |
The time for which to do the calculation (Not used by standard mizer rate functions but useful for extensions with time-dependent parameters.) |
... |
Unused |
A two dimensional array (prey species x prey size)
By default getEGrowth()
calls mizerEGrowth()
. However you can
replace this with your own alternative growth rate function. If
your function is called "myEGrowth"
then you register it in a MizerParams
object params
with
params <- setRateFunction(params, "EGrowth", "myEGrowth")
Your function will then be called instead of mizerEGrowth()
, with the
same arguments.
getERepro()
, getEReproAndGrowth()
Other rate functions:
getERepro()
,
getEReproAndGrowth()
,
getEncounter()
,
getFMort()
,
getFMortGear()
,
getFeedingLevel()
,
getMort()
,
getPredMort()
,
getPredRate()
,
getRDD()
,
getRDI()
,
getRates()
,
getResourceMort()
params <- NS_params
# Project with constant fishing effort for all gears for 20 time steps
sim <- project(params, t_max = 20, effort = 0.5)
# Get the energy at a particular time step
growth <- getEGrowth(params, n = N(sim)[15, , ], n_pp = NResource(sim)[15, ], t = 15)
# Growth rate at this time for Sprat of size 2g
growth["Sprat", "2"]
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.