[R-br] Estimar assimetria e curtose

Pessoal alguém tem alguma sugestão melhor para estimar assimetria e curtose?  Este pacote não bate a definição de  Ferreira,D, F. 2005. curtose=m_4/s^4 assimetria= m_3/s^3 -------------------------------------------------------------------------------------------------------------------------------------------------------- x=c(2,3,,5,6,8,9) library(fBasics) basicStats(x)  André Oliveira Souza. Graduação em Matemática, mestrado em estatística aplicada.Instituto Federal de Educação, Ciência e Tecnologia do Espirito Santo.  IFES