mcslope:

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

Usage

mcslope(X, Y, con, k)

Arguments

X
Y
con
k

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, con, k) 
{
    J = length(X)
    slopes <- numeric(J)
    covar <- numeric(J)
    for (j in 1:J) {
        tempx <- as.matrix(X[[j]])
        tempy <- as.matrix(Y[[j]])
        slopes[j] <- lsfit(tempx, tempy)$coef[k]
        covar[j] <- lsfitNci4(tempx, tempy)$cov[k, k]
    }
    dif.slopes <- t(con) %*% slopes
    o.se <- t(con^2) %*% covar
    o.stat <- dif.slopes/sqrt(o.se)
    om <- max(abs(o.stat))
    om
  }

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