R/permutatedSamples.R

Defines functions `permutatedSamples`

`permutatedSamples` <-
function(data, B, cl) {
  samples <- matrix(nrow=B, ncol=ncol(data))
  for(i in seq_len(B)){
    samples[i,] <- sample(seq_len(ncol(data)))
  }
  return(samples)
}
idrblab/EVALFQ documentation built on Sept. 29, 2022, 6:34 p.m.