R/permutePartsDesign.R

In RcppAlgos: High Performance Tools for Combinatorics and Computational Mathematics

permutePartsDesign <- function(
    v, m = NULL, repetition = FALSE, freqs = NULL,
    target = NULL, showDesign = FALSE
) {

    stopifnot(is.numeric(v))
    return(.Call(`_RcppAlgos_PartitionsCount`, GetTarget(v, target),
                 v, m, repetition, freqs, FALSE, "==", NULL, NULL,
                 TRUE, showDesign, FALSE, FALSE))
}