library(asar)
load("Western_Gulf_of_Maine_cod2024.rda")
wgom <- model_results
stockplotr::plot_biomass(
dat = wgom,
geom = "line",
group = NULL,
facet = NULL,
#ref_line = c("target" = 10),
unit_label = "mt",
scale_amount = 1,
relative = TRUE, # changed from FALSE
#interactive = FALSE,
#module = "TIME_SERIES",
linewidth = 2 # increase width of lines
) +
ggplot2::geom_vline(xintercept = 2005, linetype = "dashed", color = "red")
library(asar)
load("Western_Gulf_of_Maine_cod2024.rda")
wgom <- model_results
stockplotr::plot_biomass(
dat = wgom,
geom = "line",
group = NULL,
facet = NULL,
#ref_line = c("target" = 10),
unit_label = "mt",
scale_amount = 1,
relative = TRUE, # changed from FALSE
#interactive = FALSE,
#module = "TIME_SERIES",
linewidth = 2 # increase width of lines
) +
ggplot2::geom_vline(xintercept = 2005, linetype = "dashed", color = "red")