[R-br] Distribuição Exponencial

[Alexandro (Yahoo)]

Boa noite Fernanda, seja x, a variável que tenha os seus dados, tu podes testar o seguinte:

#EXEMPLO DE NÃO TER DIST. EXP
#x=rnorm(1000,10,2)
#ks.test(x, pexp, rate=5)
#pvalor=ks.test(x, pexp, rate=5)$p.value

#EXEMPLO DE DIST. EXP
x <- rexp(30, rate=5)
ks.test(x, pexp, rate=5)
pvalor=ks.test(x, pexp, rate=5)$p.value

pvalor
alfa=0.05
teste<-function(pvalor) {
if(pvalor<alfa)      {  cat("rejeita Ho  >>> pvalor é ",pvalor, "    NÃO TEM DIST. EXP  ","\n")    }
else if(pvalor>=alfa)    {  cat("NÃO rejeita Ho >>> pvalor é   ",pvalor, "  TEM DIST. EXP.  ","\n")    } 
}
teste(pvalor)



Espero ter ajudado !
Alexandro



>________________________________
>De: Fernanda Balbino <ferbalbino em yahoo.com.br>
>Para: r-br em listas.c3sl.ufpr.br
>Enviadas: Segunda-feira, 30 de Maio de 2011 17:51
>Assunto: [R-br] Distribuição Exponencial
>
>
>Olá, boa tarde a todos,
>
>
>Tenho um conjunto de dados que devido a natureza e aos gráficos de análise exploratória acredito que sigam uma distribuição exponencial.
>Gostaria de saber se no R é possível testar os dados para confirmar se realmente eles se comportam conforme uma distribuição exponencial.
>
>
>Muito obrigada.
>Fernanda Balbino.
>
>
>
>
>_______________________________________________
>R-br mailing list
>R-br em listas.c3sl.ufpr.br
>https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
>
>
>
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20110530/c7b1fdad/attachment.html>