knitr::opts_chunk$set( collapse = TRUE, comment = "#>" )
🔻 Work in Process ... 🔺
Source code at: nuseds-adult-salmon-escapement-data.Rmd
library(salmonstats) library(descriptr) library(tidyverse)
NuSEDS is the Pacific Region’s centralized Oracle database that holds adult salmon escapement data. About 10,000 salmon spawning sites in DFO Pacific Region have been observed 0 to 10 times per year for 6 species for nearly 100 years (poorly before 1948). Data is aggregated within year; the raw data is largely on paper.
ns18 <- get_nused_data() dim(ns18)
descriptr::ds_screener(ns18)
The maximum estimated number taken from: NATURAL_ADULT_SPAWNERS, NATURAL_JACK_SPAWNERS, NATURAL_SPAWNERS_TOTAL, ADULT_BROODSTOCK_REMOVALS, JACK_BROODSTOCK_REMOVALS, TOTAL_BROODSTOCK_REMOVALS, OTHER_REMOVALS, TOTAL_RETURN_TO_RIVER, UNSPECIFIED_RETURNS.
plot(ns18$MAX_ESTIMATE)
Source code: nuseds-adult-salmon-escapement-data.Rmd
NUSEDS_20180416.csv
http://www.pac.dfo-mpo.gc.ca/od-ds/science/sed-des/NUSEDS_20180416.zip
NuSEDS meta data
https://open.canada.ca/data/en/dataset/c48669a3-045b-400d-b730-48aafe8c5ee6
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.