nav:

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

Usage

nav(alpha = 0.01, k = 5)

Arguments

alpha
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 (alpha = 0.01, k = 5) 
{
    z <- -qnorm(alpha)
    den <- 1 - (2 * z * dnorm(z))/(2 * pnorm(z) - 1)
    val <- den/(1 - 2 * alpha)
    ntmav <- val + (2 * alpha * z^2)/(1 - 2 * alpha)^2
    zj <- k * qnorm(0.75)
    alphaj <- pnorm(-zj)
    alphaj <- ceiling(100 * alphaj)/100
    zj <- -qnorm(alphaj)
    den <- 1 - (2 * zj * dnorm(zj))/(2 * pnorm(zj) - 1)
    val <- den/(1 - 2 * alphaj)
    natmav <- val + (2 * alphaj * zj^2)/(1 - 2 * alphaj)^2
    return(ntmav, natmav)
  }

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