# spay-class: Class "spay" for standardised proportion at age per year In FLEDA: Exploratory Data Analysis for FLR

## Description

This class encapsulates results of a spay method.

## Creating Objects from the Class

Objects of this classe should be created with a call to the contructor function spay(object, ...), where object must be an object of class "FLQuant" and ... can be used to pass trim arguments to the creator funtion.

## Slots

spay

Object of class "FLQuant".

## Extends

Class "FLQuant", directly.

## Methods

Inherits from "FLQuant".

bubbles

signature(x="formula", data="spay"): provides the bubbles plot with different colors for positive and negative values.

## Details

Considering C_{ay}, the catch in numbers at age a=1,…,A per year y=1,…,Y, obtained e.g. from the catch.n slot of a "FLStock" object, the computation of spay P_{ay}^s is:

Consider:

P_{ay}=\frac{C_{ay}}{∑_a{C_{ay}}}

and

s_a = √{\frac{∑{(P_{ay}-\bar{P}_a)^2}}{Y-1}}

P_{ay}^s=\frac{P_{ay}-\bar{P}_a}{s_a}

FLQuant-class, trim, pay-class
  1 2 3 4 5 6 7 8 9 10 11 data(ple4sex) # compute standardized catch proportion at age ple4sex.spay <- spay(ple4sex@catch.n) # fine tune ttl <- list(label="Standardized catch proportion at age for Plaice in IV", cex=1) yttl <- list(label="age", cex=0.8) xttl <- list(cex=0.8) ax <- list(cex=0.7) # plot bubbles(age~year|unit, ple4sex.spay, main=ttl, ylab=yttl, xlab=xttl, scales=ax)