title: "readsam" output: html_document: keep_md: yes
#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.