diff --git a/R/sim_all.R b/R/sim_all.R
index 29a95c68d988210d2f43c7a5c9aeddcc39a661a2..98fd1c86ecccd6a204ca390a4335318a580c0f0d 100644
--- a/R/sim_all.R
+++ b/R/sim_all.R
@@ -44,6 +44,11 @@ sim_all <- function(nosim=2, resps, destype=NULL, designpath, u, bcoeff, decisio
     stop("Argument 'bcoeff' is required.")
   }
 
+
+  if (no_sim < chunks) {
+    stop("You cannot have more chunks than runs. The number of chunks tells us how often we save the simulation results on disk. Maximum one per run.")
+  }
+
   # Check if bcoeff is a list
   if (!is.list(bcoeff)) {
     stop("Argument 'bcoeff' must be a list.")