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)
}

Try the safe package in your browser

Any scripts or data that you put into this service are public.

safe documentation built on Nov. 8, 2020, 5:37 p.m.