powered by
3rd moment skewness ratio
skew(x)
vector
kurt
set.seed(1) x <- rexp(100) # Get skewness coefficient estimate for exponential distribution skew(x)
Run the code above in your browser using DataLab