# NOT RUN {
d <- system.file("extdata", "setas-model-new-becdev", package = "atlantistools")
ex_data <- read.csv(file.path(d, "setas-ssb-rec.csv"), stringsAsFactors = FALSE)
plot_rec(preprocess_setas$ssb_rec, ex_data)
# }
Run the code above in your browser using DataLab