Can't find fixed_parameters when using nextflow

[jdeu1023]

I am trying to use fixed_parameters in my simulatr_function()s but they do not seem to be findable when using nextflow.

Here is a reproducible example:

library(simulatr)

parameter_grid <- expand.grid(
  n = c(25, 50, 100, 200, 500)    
)
parameter_grid$ground_truth <- 0  

fixed_parameters <- list(
  B = 1000,                    
  seed = 4,                   
  fixed_par = 3
)

generate_data_f <- function(n){
  list(data = rnorm(n))
}

generate_data_function <- simulatr_function(
  f = generate_data_f,                        
  arg_names = formalArgs(generate_data_f),    
  loop = TRUE
)

compute_data_mean <- function(data, fixed_par) {
  fixed_par
  list(mean = mean(data$data))
}

compute_data_mean_spec_f <- simulatr_function(f = compute_data_mean, arg_names = "fixed_par", loop = TRUE)

run_method_functions <- list(compute_data_mean = compute_data_mean_spec_f)

l1_error <- function(output, ground_truth) {
  abs(output$mean - ground_truth)
}

evaluation_functions <- list(l1_error = l1_error)

simulatr_spec <- simulatr_specifier(
  parameter_grid,
  fixed_parameters,
  generate_data_function, 
  run_method_functions,
  evaluation_functions
)

I can run this just fine locally in R, but when I run this using nextflow on the HPC3 cluster I get the following error:

 Error in (function (data, fixed_par)  :
    argument "fixed_par" is missing, with no default