bwwna:

Usage Arguments Examples

Usage

1
bwwna(J, K, L, x)

Arguments

J
K
L
x

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
##---- 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 (J, K, L, x) 
{
    if (is.data.frame(x)) 
        x = as.matrix(x)
    y = list()
    ad = K * L
    ilow = 1
    iup = ad
    ic = 0
    for (j in 1:J) {
        z = x[ilow:iup]
        d = elimna(matl(z))
        im = 0
        for (k in 1:K) {
            for (l in 1:L) {
                ic = ic + 1
                im = im + 1
                y[[ic]] = d[, im]
            }
        }
        ilow = ilow + ad
        iup = iup + ad
    }
    y
  }

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