Call factor for input map

Blue-Matter · Jun 6, 2024 · d4b5a4a · d4b5a4a
1 parent 0ddb5ef
commit d4b5a4a
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/make-parameters.R b/R/make-parameters.R
@@ -307,7 +307,7 @@ make_map <- function(p, MARSdata, map = list(),
   nf <- MARSdata@Dfishery@nf
 
   random <- NULL
-  #map <- list()
+  map <- lapply(map, factor)
 
   # Stock parameters ----
   if (!silent) {