set.seed(123)
x <- matrix(sample(1:4, 100, replace = TRUE), nrow = 10)
# Generate 99 randomized matrices
nulls <- nullcat_batch(x, n_reps = 99, method = "curvecat", n_iter = 100)
# Or compute a statistic on each
row_sums <- nullcat_batch(x, n_reps = 99, stat = rowSums,
method = "curvecat", n_iter = 100)
# Specify multiple cores for parallel processing
nulls <- nullcat_batch(x, n_reps = 99, n_iter = 100, n_cores = 2)
Run the code above in your browser using DataLab