selbybw:

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

Usage

selbybw(m, grpc, coln)

Arguments

m
grpc
coln

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 (m, grpc, coln) 
{
    if (is.na(grpc[1])) 
        stop("The argument grpc is not specified")
    if (is.na(coln[1])) 
        stop("The argument coln is not specified")
    if (length(grpc) != 1) 
        stop("The argument grpc must have length 1")
    x <- list()
    m = m[, c(grpc, coln)]
    m <- as.data.frame(elimna(m))
    grpn <- sort(unique(m[, 1]))
    J <- length(grpn)
    K <- length(coln)
    JK <- J * K
    it <- 0
    mm = as.data.frame(m[, 2:ncol(m)])
    for (ig in 1:length(grpn)) {
        for (ic in 1:length(coln)) {
            it <- it + 1
            flag <- (m[, 1] == grpn[ig])
            x[[it]] <- as.numeric(mm[flag, ic])
        }
    }
    list(x = x, grpn = grpn)
  }

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