R/ci-utils.R

In Rariant: Identification and Assessment of Single Nucleotide Variants through Shifts in Non-Consensus Base Call Frequencies

Defines functions ciWidth ciOverlap ciCovers ciOutside

Documented in ciCovers ciOutside ciOverlap ciWidth

ciOutside <- function(x, delta = 0) {
    idx = x$lower > delta | x$upper < delta
    return(idx)
}


ciCovers <- function(x, delta = 0) {
    idx = x$lower <= delta & x$upper >= delta
    return(idx)
}


ciOverlap <- function(x, y) {
    idx = x$lower <= y$upper & y$lower <= x$upper
    return(idx)
}


ciWidth <- function(x) {
    width = x$upper - x$lower
    return(width)
}

Try the Rariant package in your browser