catchSSB.hcr {mse}

R Documentation

A HCR to set total catch based on SSB depletion level

Description

A HCR to set total catch based on SSB depletion level

Usage

catchSSB.hcr(
  stk,
  dtarget = 0.4,
  dlimit = 0.1,
  lambda = 1,
  MSY,
  dtaclow = 0.85,
  dtacupp = 1.15,
  yrs = 1,
  metric = "ssb",
  args,
  tracking
)

Arguments

stk	The perceived FLStock.
MSY	Assumed or estimated MSY.
args	MSE arguments, class list.
tracking	Structure for tracking modules outputs.
dtarget=0.40	Depletion level from which catch is decreased.
dlimit=0.10	Depletion level at which fishing is stopped.
lambda=1	Multiplier for MSY level.
dtaclow=0.85	Maximum proportional decrease in allowable catch.
dtacupp=1.15	Maximum proportional increase in allowable catch.

Value

A list with elements ctrl, of class fwdControl, and tracking.

Examples

data(sol274)
catchSSB.hcr(stock(om), MSY=140000, tracking=FLQuant(),
args=list(ay=2018, data_lag=1, management_lag=1, frq=1))
# APPLY hcr over a range of dtarget values
lapply(seq(0.30, 0.80, by=0.1), function(x) {
  catchSSB.hcr(stock(om), MSY=140000, dtarget=x,
  args=list(ay=2018, data_lag=1, management_lag=1, frq=1),
  tracking=FLQuant())$ctrl } )

---