ocor:

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

Usage

ocor(x, y, corfun = pbcor, outfun = outmgvf, pcor = FALSE, plotit = FALSE)

Arguments

x
y
corfun
outfun
pcor
plotit

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, corfun = pbcor, outfun = outmgvf, pcor = FALSE, 
    plotit = FALSE) 
{
    xx <- elimna(cbind(x, y))
    x <- xx[, 1]
    y <- xx[, 2]
    flag <- rep(T, length(x))
    temp <- outfun(cbind(x, y), plotit = plotit)$out.id
    flag[temp] <- F
    if (pcor) 
        ocor <- cor(x[flag], y[flag])
    if (!pcor) 
        ocor <- corfun(x[flag], y[flag])$cor
    list(cor = ocor)
  }

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