Add 50 cell simulations

code/simulation-pars.R

@@ -66,7 +66,7 @@ num_cells_sims <- expand_grid(
   de.facLoc = 2,
   rep = 1:2,
   n_clus = 5,
-  batchCells = c(100, 500, seq(1000, 3000, by = 1000)),
+  batchCells = c(50, 100, 500, seq(1000, 3000, by = 1000)),
   group.prob = list(rep(1 / 5, 5)),
 ) %>%
   rowid_to_column() %>%