R/print.allPerms.R

Defines functions `print.allPerms`

`print.allPerms` <- function(x, ...) {
    dims <- dim(x)
    control <- attr(x, "control")
    observed <- attr(x, "observed")
    attributes(x) <- NULL
    dim(x) <- dims
    print(x)
    return(invisible(x))
}
gavinsimpson/permute documentation built on Aug. 16, 2024, 6:24 a.m.