diff --git a/R/model.R b/R/model.R
index 7e0cab4f..a29b63a4 100644
--- a/R/model.R
+++ b/R/model.R
@@ -105,7 +105,8 @@ Check that specified model(s) are model definitions.", nm[which(!is_mdl)[1]]))
         rep(models, each = length(lst_data)),
         FUN = estimate_progress,
         SIMPLIFY = FALSE,
-        future.globals = FALSE
+        future.globals = FALSE,
+        future.seed = TRUE
       )
       unname(split(out, rep(seq_len(num_mdl), each = num_key)))
     }
diff --git a/R/utils.R b/R/utils.R
index 1aedd6d8..b7bc4ee7 100644
--- a/R/utils.R
+++ b/R/utils.R
@@ -264,7 +264,8 @@ mapply_maybe_parallel <- function (.f, ..., MoreArgs = list(), SIMPLIFY = FALSE)
       ...,
       MoreArgs = MoreArgs,
       SIMPLIFY = SIMPLIFY,
-      future.globals = FALSE
+      future.globals = FALSE,
+      future.seed = TRUE
     )
   }
   else{