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)


einarhjorleifsson/readsam documentation built on May 31, 2019, 11:42 p.m.