R/qvalue.rank.R

In methylMnM: detect different methylation level (DMR)

Defines functions qvalue.rank

Documented in qvalue.rank

qvalue.rank <-
function(x) {
        idx <- sort.list(x)
        fc <- factor(x)
        nl <- length(levels(fc))
        bin <- as.integer(fc)
        tbl <- tabulate(bin)
        cs <- cumsum(tbl)
        tbl <- rep(cs, tbl)
        tbl[idx] <- tbl
        return(tbl)
    }

Try the methylMnM package in your browser