In kimberly-bastille/sin-cat: Synthetic Indicator Catalogue

Ecosytem overfishing {#ppr}

Description: Ecosystem overfishing is an ecological, and not legal, term that ultimately evaluates how much fish are caught in an ecosystem relative to how much can be produced. Several indices are used to evaluate ecosystem overfishing, the Ryther index, the Fogarty index, and primary production required.

Indicator family:

• [X] Megafauna
• [X] Economic

Contributor(s): Andrew Beet

Affiliations: NEFSC

knitr::opts_chunk$set(echo = F)
library(ecodata)

Introduction to Indicator

The Ryther index is defined as total catch per unit area in the ecosystem [@link_global_2019]. The units are mt km^-2 year^-1. It measures the total removal of fish biomass by area in a Large Marine Ecosystem relative to how much that entire ecosystem can produce. In general terms, the lower the Ryther index, the less likely an ecosystem will be experiencing ecosystem overfishing.

The Fogarty index is defined as ratio of total catches to total primary productivity in an ecosystem [@link_global_2019]. The units are parts per thousand.

A modification of the indices are used. Total landings are used in lieu of total catch. Accountng for total IUU (Illegal, unreported, and unregulated fishing) data, at the spatial footprint required, is not currently available. This will have the effect of reducing the value of the index (compared to using total catch, including IUU).

Key Results and Visualizations

Compared to thresholds based on global estimates of primary production and catch, the Ryther index shows elevated levels of fishing in the Gulf of Maine and the Mid Atlantic but not at a point considered "extreme" [@link_global_2019]. When accounting for regional primary productivity the Fogarty index shows low levels of fishing relative to these global thresholds.

Thresholds based on regional estimates of primary productivity, are not yet available. This work is ongoing

MidAtlantic

# Plot indicator
ggplotObject <- ecodata::plot_ppr(report= 'MidAtlantic', varName= 'pp' ,threshold= 'global')
ggplotObject

# Plot indicator
ggplotObject <- ecodata::plot_ppr(report= 'MidAtlantic', varName= 'pp' ,threshold= 'regional')
ggplotObject

# Plot indicator
ggplotObject <- ecodata::plot_ppr(report= 'MidAtlantic', varName= 'fogarty' ,threshold= 'global')
ggplotObject

# Plot indicator
ggplotObject <- ecodata::plot_ppr(report= 'MidAtlantic', varName= 'fogarty' ,threshold= 'regional')
ggplotObject

# Plot indicator
ggplotObject <- ecodata::plot_ppr(report= 'MidAtlantic', varName= 'ryther' ,threshold= 'global')
ggplotObject

# Plot indicator
ggplotObject <- ecodata::plot_ppr(report= 'MidAtlantic', varName= 'ryther' ,threshold= 'regional')
ggplotObject

NewEngland

# Plot indicator
ggplotObject <- ecodata::plot_ppr(report= 'NewEngland', varName= 'pp' ,threshold= 'global')
ggplotObject

# Plot indicator
ggplotObject <- ecodata::plot_ppr(report= 'NewEngland', varName= 'pp' ,threshold= 'regional')
ggplotObject

# Plot indicator
ggplotObject <- ecodata::plot_ppr(report= 'NewEngland', varName= 'fogarty' ,threshold= 'global')
ggplotObject

# Plot indicator
ggplotObject <- ecodata::plot_ppr(report= 'NewEngland', varName= 'fogarty' ,threshold= 'regional')
ggplotObject

# Plot indicator
ggplotObject <- ecodata::plot_ppr(report= 'NewEngland', varName= 'ryther' ,threshold= 'global')
ggplotObject

# Plot indicator
ggplotObject <- ecodata::plot_ppr(report= 'NewEngland', varName= 'ryther' ,threshold= 'regional')
ggplotObject

Indicator statistics

Spatial scale: EPU

Temporal scale: Annual

Synthesis Theme:

• [X] Multiple System Drivers
• [X] Regime Shifts
• [X] Ecosystem Reorganization

# Either from Contributor or ecodata

Implications

There is insufficient evidence to determine whether ecosystem overfishing in occuring in our region. However the overall amount of ecosytem fishing has been declining over the past several years.

Get the data

Point of contact: [e-mail]{.email}

ecodata name: ecodata::ppr

Variable definitions

1. Ryther; The Ryther index; mt km^-2 y^-1
2. Fogarty; The Fogarty Index; Parts per thousand 0/00
3. PP; Primary Production; mtC region^-1 year^-1

# Pull all var names
vars <- ecodata::ppr |>
   dplyr::select(Var, Units) |>
   dplyr::distinct()

DT::datatable(vars)

Indicator Category:

• [X] Published Methods

Public Availability

Source data are NOT publicly available.

Accessibility and Constraints

Please email [e-mail] for further information and queries of source data.

tech-doc link https://noaa-edab.github.io/tech-doc/ppr.html

kimberly-bastille/sin-cat documentation built on Oct. 29, 2024, 3:08 a.m.