TITLE(kurtosis @@  Kurtosis)
USAGE(
kurtosis(x, na.rm=FALSE)
)
ARGUMENTS(
ARG(x @@ a numeric vector containing the values whose kurtosis is to
be computed. )
ARG(na.rm @@ a logical value indicating whether NA values should be
stripped before the computation proceeds. )
)
DESCRIPTION(
Computes the kurtosis of the values of LANG(x). 
BLANK
If EQN(N = length(x)), then the kurtosis of EQN(x) is defined as 
BLANK
EQN(N^(-1) var(x)^(-2) sum_i (x_i - mean(x))^4 - 3)  
)
VALUE(
Returns the kurtosis of x.
)
EXAMPLES(
x<-rnorm(100)
kurtosis(x)
)
