Error in `array(NA_real_, dim = c(sim_runs, 2), dimnames = list(Run = 1:1000, Outcome = c("Cost", "QALYs")))`: length of 'dimnames' [1] not equal to array extent

testthat::test_that("run_model returns base and alt results", {
res <- DepMod::run_model(sim_runs = 1, total_population = 100)

"run_model returns base and alt results"