Fixes #2

DESCRIPTION

@@ -1,7 +1,7 @@
 Type: Package
 Package: R6Sim
 Title: R6-based Simulation Modeling Toolkit
-Version: 1.0.0
+Version: 1.0.1
 Authors@R: 
     person("Pedro", "Nascimento de Lima", , "[email protected]", role = c("cre", "aut"),
            comment = c(ORCID = "0000-0001-9057-198X"))

R/R6Experiment_run.R

@@ -56,6 +56,10 @@ R6Experiment_run <- function(self, n_cores, parallel, cluster_eval_script, model
   }
 
   # progress bar ------------------------------------------------------------
+
+  # Progress bar is commented out due to licensing issues with foreach.
+  # Should these issues be resolved, it should be easy to bring it back in.
+
   # Progress bar setup adapted from:
   # https://stackoverflow.com/questions/5423760/how-do-you-create-a-progress-bar-when-using-the-foreach-function-in-r
   # pb <- progress_bar$new(
@@ -73,8 +77,6 @@ R6Experiment_run <- function(self, n_cores, parallel, cluster_eval_script, model
 
   # foreach loop ------------------------------------------------------------
 
-  #browser()
-
   if (parallel) {
 
     # Using parLapply and not foreach due to licensing issues.
@@ -113,9 +115,6 @@ run_single_experiment <- function(policy_design_id, self, model_from_cluster_eva
 
   res <- model$simulate(...)
 
-
-  #browser()
-  # This cbind might be the issue, it might not be handling the policy design appropriately.
   return(cbind(self$policy_design[policy_design_id, ], res))
 
 }