powered by
x
If $N = length(x)$, then the kurtosis of $x$ is defined as $$N^(-1) var(x)^(-2) sum_i (x_i - mean(x))^4 - 3$$
kurtosis(x, na.rm=FALSE)
x<-rnorm(100) kurtosis(x)
Run the code above in your browser using DataLab