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