get_froese_etal_2002_status: Return the Froese and Kesner-Reyes 2002 stock status based on...

In seananderson/catchstatus: Methods to assign status to fish stocks based on catch series.

Description

Return the fisheries stock status from a catch series using the algorithm in: @articleFroese:2002:IFA, Author = Rainer Froese and Kathleen Kesner-Reyes, Journal = ICES Council Meeting Report, Pages = 1–16, Title = Impact of Fishing on the Abundance of Marine Species, Volume = CM 2002/L:12, Year = 2002

Usage

get_froese_etal_2002_status(catch)

Arguments

catch

A time series of catch with no missing values.

Value

A vector of statuses.

Author(s)

Sean Anderson

References

Froese, R. and Kesner-Reyes, K. 2002. Impact of fishing on the abundance of marine species. ICES Council Meeting Report, CM 2002/L:12: 1<e2><80><93>16.

See Also

plot_status_stacked, plot_status_ts, get_froese_etal_2012_status

Examples

set.seed(3)
x <- c(1:20, 20:1, rep(2, 5), 2:20, 19:1, rep(2, 10), 2:8)*10 + rnorm(100, 6, 8)
years <- 1901:2000
dat <- data.frame(year = years, catch = x)
plot(dat[,1:2], type = "o", pch = 20)
transform(dat, status = get_froese_etal_2002_status(catch))

seananderson/catchstatus documentation built on May 29, 2019, 4:25 p.m.