Dp:

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

Usage

Dp(p)

Arguments

p

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 (p) 
{
    p2 = p * p
    ps = p * (p + 1)/2
    Dup = matrix(0, p2, ps)
    count = 0
    for (j in 1:p) {
        for (i in j:p) {
            count = count + 1
            if (i == j) {
                Dup[(j - 1) * p + j, count] = 1
            }
            else {
                Dup[(j - 1) * p + i, count] = 1
                Dup[(i - 1) * p + j, count] = 1
            }
        }
    }
    return(Dup)
  }

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