knitr::opts_chunk$set(echo = TRUE)
#library(stockassessment) # devtools::install_github("einarhjorleifsson/readsam") library(tidyverse) ass <- "sam-tmb-fsaithe-2017-01" # input-by-year-and-age, from assessment.org ibya <- readsam::read_ibya(ass) ibya # get fit from assessment.org fit <- readsam:::get_fit(ass) # results-by-year-and-age rbya <- readsam::read_rbya_sam(fit, ibya) # results-by-year rby <- readsam::read_rby_sam(fit, ibya)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.