Fix SSS mem check

Blue-Matter · Jan 31, 2021 · 24418d5 · 24418d5
1 parent 506730a
commit 24418d5
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -5,7 +5,7 @@ Version: 1.1.0
 Authors@R: c(person("Quang", "Huynh", email = "quang@bluematterscience.com", role = c("aut", "cre")), 
   person("Tom", "Carruthers", email = "tom@bluematterscience.com", role = "aut"),
   person("Adrian", "Hordyk", email = "adrian@bluematterscience.com", role = "aut"))
-Date: 2021-01-28
+Date: 2021-01-31
 Maintainer: Quang Huynh <quang@bluematterscience.com>
 Description: Simulation tools for closed-loop simulation are provided for the 'MSEtool' operating model to inform data-rich fisheries. 
   'SAMtool' provides a conditioning model, assessment models of varying complexity with standardized reporting, 

diff --git a/R/assess_SSS.R b/R/assess_SSS.R
@@ -85,7 +85,7 @@ SSS <- function(x = 1, Data, dep = 0.4, SR = c("BH", "Ricker"), rescale = "mean1
   data <- list(model = "SCA_Pope", C_hist = C_hist, rescale = rescale, 
                I_hist = I_hist, I_sd = matrix(0.01, n_y, 1), I_units = 1, I_vul = matrix(1, n_age, 1), 
                abs_I = 0, nsurvey = 1, LWT = 1,
-               CAA_hist = matrix(0, n_y, max_age), CAA_n = rep(0, n_y), n_y = n_y, n_age = n_age, M = M,
+               CAA_hist = matrix(0, n_y, max_age), CAA_n = rep(NA_real_, n_y), n_y = n_y, n_age = n_age, M = M,
                weight = Wa, mat = mat_age, vul_type = "logistic",
                SR_type = SR, CAA_dist = "multinomial", est_early_rec_dev = rep(0, n_age - 1),
                est_rec_dev = rep(0, n_y))