# Set seed of the random number generation
set.seed(123)
# Generate random numbers according to N(0, 1)
x <- rnorm(100)
# Example 1: Compute skewness
skewness(x)
# Example 2: Compute excess kurtosis
kurtosis(x)
Run the code above in your browser using DataLab