ebarplot:

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

Usage

ebarplot(x, y = NULL, nse = 2, liw = uiw, aui = NULL, ali = aui, err = "y", tr = 0, ylim = NULL, sfrac = 0.01, gap = 0, add = FALSE, col = par("col"), lwd = par("lwd"), slty = par("lty"), xlab = "Group", ylab = NULL, ...)

Arguments

x
y
nse
liw
aui
ali
err
tr
ylim
sfrac
gap
add
col
lwd
slty
xlab
ylab
...

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 = NULL, nse = 2, liw = uiw, aui = NULL, ali = aui, 
    err = "y", tr = 0, ylim = NULL, sfrac = 0.01, gap = 0, add = FALSE, 
    col = par("col"), lwd = par("lwd"), slty = par("lty"), xlab = "Group", 
    ylab = NULL, ...) 
{
    if (tr == 0.5) 
        stop("For medians, use ebarplot.med")
    if (!is.null(y)) {
        if (is.matrix(x)) 
            stop("When y is given, x should not be a matrix")
        if (is.list(x)) 
            stop("When y is given, x should not be in list mode")
        rem = x
        x = list()
        x[[1]] = rem
        x[[2]] = y
    }
    if (is.matrix(x)) 
        x <- listm(x)
    mval <- NA
    if (!is.list(x) && is.null(y)) 
        stop("This function assumes there\n are  two or more groups")
    for (j in 1:length(x)) mval[j] <- mean(x[[j]], na.rm = TRUE, 
        tr = tr)
    se <- NA
    for (j in 1:length(x)) se[j] <- trimse(x[[j]], na.rm = TRUE, 
        tr = tr)
    uiw <- nse * se
    plotCI(mval, y = NULL, uiw = uiw, liw = uiw, aui = NULL, 
        ali = aui, err = "y", ylim = NULL, sfrac = 0.01, gap = 0, 
        add = FALSE, col = par("col"), lwd = par("lwd"), slty = par("lty"), 
        xlab = xlab, ylab = ylab)
  }

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