Merge branch 'master' of https://github.com/pbs-assess/gfplot

pbs-assess · Oct 21, 2024 · c8e59db · c8e59db
2 parents 56ac899 + 96fda8c
commit c8e59db
Showing 1 changed file with 6 additions and 1 deletion.
diff --git a/R/maturity.R b/R/maturity.R
@@ -49,7 +49,12 @@ fit_mat_ogive <- function(dat,
   link <- match.arg(link)
 
   if(!("month" %in% names(dat))){
-  dat <- mutate(dat, month = lubridate::month(trip_start_date))
+      if(("sample_date" %in% names(dat))){
+        dat <- mutate(dat, month = lubridate::month(sample_date))
+      } else {
+        dat <- mutate(dat, month = lubridate::month(trip_start_date))
+        print("Assigned a month using trip start dates rather than sample dates.")
+      }
   }
 
   dat <- dat %>% filter(maturity_convention_code != 9)