calc_tsa.sum: (SPFI) Sum CWT catch by fishery, stock, and age.

In MichaelFolkes/ctctools: Analytical tools For The Pacific Salmon Commission's Chinook Technical Committee.

Description

(SPFI) Sum CWT catch by fishery, stock, and age.

Usage

calc_tsa.sum(x, newvar.name = "value.sum")

Arguments

x	A data frame. Typically the cwtcatch object.
newvar.name	A string of length one. This is the new name for the column of summed data. The default is "value.sum". It's recommended not to change the default unless using this function for purposes independent of the SPFI estimation.

Value

A data frame of the CWT catch sum grouped by fishery, stock, and age.

Examples

## Not run: 
  cwtcatch <- hrj.df[hrj.df$data.type=="NomCat" & hrj.df$fishery.index %in% fishery.subset & hrj.df$Stock.Number %in% stock.subset,]
if(region=="seak") cwtcatch <- adjustAlaska(x = cwtcatch, data.catch = data.catch)
r.tsa.sum <- calc_tsa.sum(x = cwtcatch, newvar.name = "r.tsa.sum")

## End(Not run)

MichaelFolkes/ctctools documentation built on May 7, 2019, 4:56 p.m.