unidepth:

In musto101/wilcox_R: What the package does (short line)

Usage

unidepth(x, pts = NA)

Arguments

x
pts

Examples

##---- Should be DIRECTLY executable !! ----
##-- ==>  Define data, use random,
##--	or do  help(data=index)  for the standard data sets.

## The function is currently defined as
function (x, pts = NA) 
{
    if (!is.vector(x)) 
        stop("x should be a vector")
    if (is.na(pts[1])) 
        pts <- x
    pup <- apply(outer(pts, x, FUN = "<="), 1, sum)/length(x)
    pdown <- apply(outer(pts, x, FUN = "<"), 1, sum)/length(x)
    pdown <- 1 - pdown
    m <- matrix(c(pup, pdown), nrow = 2, byrow = T)
    dep <- apply(m, 2, min)
    dep
  }

musto101/wilcox_R documentation built on May 23, 2019, 10:52 a.m.