André, eu acho que há muitas opções disponíveis em que permite você escolher o tipo de curtose você quer. Veja por exemplo no pacote: e1071
x=c(2,3,NA,5,6,8,9) require(e1071) > kurtosis(x, na.rm = TRUE,type=3) [1] -1.878889 > kurtosis(x, na.rm = TRUE,type=2) [1] -1.541333 > kurtosis(x, na.rm = TRUE,type=1) [1] -1.3856 require(SciencesPo) Tipo 2 como padrão. > detail(x) vars obs mean sd var se median mad trimmed winsor range min max 1 1 6 5.5 2.7 7.5 1.1 5.5 3.7 5.5 5.5 7 2 9 skew kurt 1 0 -1.5 2014-10-12 14:14 GMT-03:00 Andre Oliveira <[email protected]>: > 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 > > > _______________________________________________ > R-br mailing list > [email protected] > https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br > Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código > mínimo reproduzível. _______________________________________________ R-br mailing list [email protected] https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
