skew:

Usage Arguments Examples

Usage

1
skew(x)

Arguments

x

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
##---- 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) 
{
    x = elimna(x)
    m1 <- mean(x)
    m2 <- var(x)
    m3 <- sum((x - m1)^3)/length(x)
    m4 <- sum((x - m1)^4)/length(x)
    sk <- m3/m2^1.5
    ku <- m4/m2^2
    list(skew = sk, kurtosis = ku)
  }

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