Description Usage Arguments Details Value References Examples
stockSim
simulates a stock using variable fishing mortality
and stock recruitment relationship
1 | stockSim(params, nyears = 100, Ft = 0, env_at = 1, env_bt = 1)
|
params |
List of parameters for the population. Applies a single cohort
simulation for the initial population state using |
nyears |
number of years in the simulation |
Ft |
time series vector for fishing mortality. If a single value, then the function assumes a constant fishing mortality for the entire simulation (default=0) |
env_at |
time series vector for environmental effects to maximum recruitment
(e.g. |
env_bt |
time series vector for environmental effects to half maximum recruitment
parameter (e.g. |
params
list should contain the following parameters:
species
Species name
growthFun
Name of growth function (e.g. "growth_VB" is the von
Bertalanffy growth function)
amax
Maximum age
LWa
Length-weight relationship parameter a (weight~a*length^b)
LWb
Length-weight relationship parameter b (weight~a*length^b)
M
Natural mortality
F
Fishing mortality
N0
Number of individuals at time 0
matFun
Name of maturity function (e.g. "pmat_w" is a logistic
function that includes width, w, of quantiles)
selectFun
Function to use for gear selection. Determines lengths
vulnerable to fishing mortality (e.g. "gillnet" and "knife_edge" functions).
srrFun
Stock-recruitment relationship function (e.g. "srrFecBH").
fec
Number of eggs produced per weight [g] of mature female (For use in
srrFecFun).
...
Other parameters for growth, maturity, and selectivity functions.
For fitting an optimal time series of fishing mortalities, Ft
, see
optim.stockSim
(Walters and Martell, 2004).
A list
Btc
matrix. Stock biomass by time (rows) and cohort (columns).
Ytc
matrix. Fishery yield by time (rows) and cohort (columns).
Bt
vector. Stock biomass by time.
Yt
vector. Fishery yield by time.
Nt
vector. Stock size (in numbers) by time.
Ct
vector. Fishery catch (in numbers) by time.
Walters, C. J., Martell, S. J., 2004. Fisheries ecology and management. Princeton University Press.
1 2 3 4 5 6 7 8 9 10 11 12 13 | data(tilapia)
params <- tilapia
params$knife_edge_size <- 20
params$N0 <- 1e9
nyears <- 50
Ft <- rep(0.5, nyears)
set.seed(1)
env_at <- runif(nyears, min=0.5, max=1.5)
env_bt <- rep(1, nyears); env_bt[20:35] <- 0.5
tmp <- stockSim(Ft=Ft, params=params, nyears=nyears, env_at=env_at, env_bt=env_bt)
plot(tmp$Bt, t="l")
plot(tmp$Yt, t="l")
sum(tmp$Yt/1e6, na.rm=TRUE)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.