# NOT RUN {
## generate 10 random combinations
comboSample(30, 15, TRUE, n = 10, seed = 10)
## using sampleVec to generate specific permutations
permuteSample(15, 10, freqs = c(1,2,2,1,2,2,1,2,1,2,2,1,2,1,1),
sampleVec = c(1, 10^2, 10^5, 10^8, 10^11))
all.equal(comboSample(10, 5,
sampleVec = 1:comboCount(10, 5)),
comboGeneral(10, 5))
## Examples with enormous number of total permutations
num = permuteCount(10000, 20)
gmp::log2.bigz(num)
## [1] 265.7268
first = gmp::urand.bigz(n = 1, size = 265, seed = 123)
mySamp = do.call(c, lapply(0:10, function(x) gmp::add.bigz(first, x)))
class(mySamp)
## [1] "bigz"
## using permuteSample
pSamp = permuteSample(10000, 20, sampleVec = mySamp)
## using permuteGeneral
pGeneral = permuteGeneral(10000, 20,
lower = first,
upper = gmp::add.bigz(first, 10))
identical(pSamp, pGeneral)
## [1] TRUE
## Using nThreads
permuteSample(10000, 50, n = 8, seed = 10, nThreads = 2)
## Using FUN
permuteSample(10000, 50, n = 8, seed = 10, FUN = sd)
# }
# NOT RUN {
## Using Parallel
permuteSample(10000, 50, n = 80, seed = 10, Parallel = TRUE)
# }
Run the code above in your browser using DataLab