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)
}
JianboFu0406/EVALFQ111 documentation built on Aug. 10, 2020, 1:49 p.m.