suppressWarnings(RNGversion("3.5.0"))
set.seed(1)
permutations(letters[1:5], nset = 3, check = FALSE)
## Restricted permutations of data from a time series
control <- how(within = Within(type = "series"))
permutations(c(10, 20, 30, 40, 50), nset = 3,
control = control, check = FALSE)
Run the code above in your browser using DataLab