<div dir="ltr">Olá André,<div><br></div><div>Agradeço a sua sugestão de leitura.</div><div><br></div><div>De fato, a kurtose média na distribuição normal é 3. Ocorre que nesta função kurtosis(x), da biblioteca agricolae, a saída é um desvio desta curtose média, por isto kurtosis(x)=0.</div><div><br></div><div>Se eu estiver enganado, por favor me informe.</div><div><br></div><div>Luiz Roberto.</div></div><div class="gmail_extra"><br clear="all"><div><div class="gmail_signature"><div>Luiz Roberto Martins Pinto<br>Prof. Pleno/DCET/UESC</div><div>Laboratório de Estatística Computacional</div><div>Universidade Estadual de Santa Cruz</div><div>Ilhéus-Bahia<br><br><a href="mailto:luizroberto.uesc@gmail.com" target="_blank">luizroberto.uesc@gmail.com</a><br>skype: lrmpinto</div>
<div><a href="http://lattes.cnpq.br/2732314327604831" target="_blank">http://lattes.cnpq.br/2732314327604831</a> <br><br><br></div></div></div>
<br><div class="gmail_quote">Em 17 de dezembro de 2014 20:48, Andre Oliveira <span dir="ltr"><<a href="mailto:andreolsouza@yahoo.com.br" target="_blank">andreolsouza@yahoo.com.br</a>></span> escreveu:<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex"><div><div style="color:#000;background-color:#fff;font-family:HelveticaNeue-Light,Helvetica Neue Light,Helvetica Neue,Helvetica,Arial,Lucida Grande,sans-serif;font-size:10px"><div dir="ltr">Assimetria é zero e curtose é 3 não? <br></div><div dir="ltr"><br></div><div dir="ltr">Testa as hipóteses! <br></div><br><div># D'Agostino, R.B. (1970). Transformation to Normality of the Null Distribution of G1. -Biometrika, 57, 3, 679-681.</div><div><br></div>require(moments)<br>x=c(72, 70, 77, 60, 67, 69, 68, 66, 65, 71, 69)<br>skewness(x)<br>kurtosis(x)<br>agostino.test(x, alternative = "two.sided")<br>anscombe.test(x, alternative="two.sided")<br><br><div><span></span></div><div> </div><div><div>
<br>
<br>André Oliveira Souza. 
<br>Graduação em Matemática, mestrado em estatística aplicada.Instituto Federal de Educação, Ciência e Tecnologia do Espirito Santo.  IFES
<br>
<br></div></div> <div><br><br></div><div style="display:block"> <div style="font-family:HelveticaNeue-Light,Helvetica Neue Light,Helvetica Neue,Helvetica,Arial,Lucida Grande,sans-serif;font-size:10px"> <div style="font-family:HelveticaNeue,Helvetica Neue,Helvetica,Arial,Lucida Grande,sans-serif;font-size:16px"> <div dir="ltr"> <font face="Arial"> Em Quarta-feira, 17 de Dezembro de 2014 18:47, Luiz Roberto Martins Pinto <<a href="mailto:luizroberto.uesc@gmail.com" target="_blank">luizroberto.uesc@gmail.com</a>> escreveu:<br> </font> </div>  <br><br> <div><div><div class="h5"><div><div dir="ltr">Caros,<div><br></div><div>Considerem x=rnorm(1000).</div><div><br></div><div>As funções</div><div>skewness(x) # retorna valor simetria.</div><div>kurtosis(x)    # retorna valor curtose.</div><div><br></div><div>A distribuição normal teórica é simetrica, com skewness(x)=0, e mesocúrtica, com kurtosis(x)=0.</div><div><br></div><div>Preciso saber os intervalos para skewness(x) e kurtosis(x), de modo que o vetor x seja considerado 'normalmente distribuído'.</div><div><br></div><div>Luiz Roberto.</div><div><br></div><div><br clear="all"><div><div><div>Luiz Roberto Martins Pinto<br>Prof. Pleno/DCET/UESC</div><div>Laboratório de Estatística Computacional</div><div>Universidade Estadual de Santa Cruz</div><div>Ilhéus-Bahia<br><br><a rel="nofollow" href="mailto:luizroberto.uesc@gmail.com" target="_blank">luizroberto.uesc@gmail.com</a><br>skype: lrmpinto</div>
<div><a rel="nofollow" href="http://lattes.cnpq.br/2732314327604831" target="_blank">http://lattes.cnpq.br/2732314327604831</a> <br><br><br></div></div></div>
</div></div></div><br></div></div>_______________________________________________<br>R-br mailing list<br><a href="mailto:R-br@listas.c3sl.ufpr.br" target="_blank">R-br@listas.c3sl.ufpr.br</a><br><a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" target="_blank">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br>Leia o guia de postagem (<a href="http://www.leg.ufpr.br/r-br-guia" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo reproduzível.<br><br></div>  </div> </div>  </div> </div></div><br>_______________________________________________<br>
R-br mailing list<br>
<a href="mailto:R-br@listas.c3sl.ufpr.br">R-br@listas.c3sl.ufpr.br</a><br>
<a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" target="_blank">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br>
Leia o guia de postagem (<a href="http://www.leg.ufpr.br/r-br-guia" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo reproduzível.<br></blockquote></div></div>