skew(x,method="unbiased")
kurt(x,method="unbiased")"moments" and "unbiased", and three choices are possible for kurtosis: "unbiased", "moments", and "excess"then the method of moments skewness is: $m_3/m_{2}^{3/2}$, the method of moments kurtosis is: $m_4/m_2^2$, and the excess method of moments kurtosis is $m_4/m_2^2 -3$.
These estimators are biased low, particularly given small sample sizes. A more complex estimator is required to account for this bias. This is provided by method = "unbiased" in skew and kurt.
exp<-rexp(10000)
skew(exp)
kurt(exp)Run the code above in your browser using DataLab