R/error.FWER.Bonf.R

error.FWER.Bonf <-
function (P.matrix) {
    cap <- (P.matrix[1, ] * dim(P.matrix)[[2]]) <= 1
    return((P.matrix[1, ] * dim(P.matrix)[[2]])^cap)
}
lgeistlinger/safe documentation built on Aug. 4, 2023, 7:34 p.m.