Fix variable scoping for multiple cores

When running from the command line, the variable "current_args" needs to be exported.

R/fit.R

@@ -208,6 +208,7 @@ fit.data <-
         {
             logging::loginfo("Creating cluster of %s R processes", cores)
             cluster <- parallel::makeCluster(cores)
+            if(exists("current_args")) clusterExport(cluster, "current_args")
         }
 
         ##############################