# checks on parsing of scheduling arguments and script setup
track <- submitModels(p, sched_args=c("--mail=user", "--export=v"), debug=TRUE, max_time_per_job = "4:10:00", combine_jobs = TRUE)
submitModels(inp, sched_args=c("--mail=user", "--export=v"), debug=TRUE, max_time_per_job = "2:10:00", combine_jobs = TRUE, replace="always")
test_that("submitModels job ID check", {
test_that("submitModels job allocation checks", {
# checks on cluster (must be run on slurm cluster!)
track <- submitModels(p, sched_args=c("--mail=user", "--export=v"), debug=TRUE, max_time_per_job = "48:10:00", batch_outdir = file.path(p, "batchfiles"))
test_that("submitModels combines jobs as expected", {

"submitModels combines jobs as expected"