qsplit:

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

Usage

qsplit(x, y, split.val = NULL)

Arguments

x
y
split.val

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, y, split.val = NULL) 
{
    if (!is.data.frame(x)) 
        x = as.matrix(x)
    if (is.null(split.val)) {
        v = idealf(y)
        flag1 = (y <= v$ql)
        flag2 = (y >= v$qu)
    }
    if (!is.null(split.val)) {
        flag1 = (y <= split.val[1])
        flag2 = (y >= split.val[2])
    }
    flag3 = as.logical(as.numeric(!flag1) * as.numeric(!flag2))
    d1 = x[flag1, ]
    d2 = x[flag2, ]
    d3 = x[flag3, ]
    list(lower = d1, middle = d3, upper = d2)
  }

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