linplot:

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

Usage

linplot(x, con = 0, plotfun = akerd, nboot = 800, plotit = TRUE, pyhat = FALSE, ...)

Arguments

x
con
plotfun
nboot
plotit
pyhat
...

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, con = 0, plotfun = akerd, nboot = 800, plotit = TRUE, 
    pyhat = FALSE, ...) 
{
    if (is.matrix(x)) 
        x <- listm(x)
    if (!is.list(x)) 
        stop("Data must be stored in list mode or in matrix mode.")
    J <- length(x)
    tempn <- 0
    mvec <- NA
    for (j in 1:J) {
        temp <- x[[j]]
        temp <- temp[!is.na(temp)]
        tempn[j] <- length(temp)
        x[[j]] <- temp
    }
    Jm <- J - 1
    if (sum(con^2) == 0) 
        con <- matrix(1, J, 1)
    bvec <- matrix(NA, nrow = J, ncol = nboot)
    for (j in 1:J) {
        data <- matrix(sample(x[[j]], size = nboot, replace = TRUE), 
            nrow = nboot)
        bvec[j, ] <- data
    }
    bcon <- t(con) %*% bvec
    bcon <- as.vector(bcon)
    dval <- plotfun(bcon, pyhat = pyhat, ...)
    dval
  }

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