Se quiser Intervalo de confianca para a media com variancia conhecida, você pode usar a função abaixo
ic.media <- function(x,sigma2,conf.level=0.95){
n<-length(x)
xbarra<-mean(x)
z<-qnorm((1+conf.level)/2)
LI <- xbarra - z*sqrt(sigma2)/sqrt(n)
LS <- xbarra + z*sqrt(sigma2)/sqrt(n)
return(c(LI,LS))
}
Se
você não estiver interessado em calcular o intervalo de confiança, e
sim apenas do resultado final, utilize o t.test()$conf.level
Em 11 de maio de 2011 17:45, Victor Eduardo
<victorduca08@gmail.com> escreveu:
Se quiser Intervalo de confianca para a media com variancia conhecida, você pode usar a função abaixo
ic.media <- function(x,sigma2,conf.level=0.95){
n<-length(x)
xbarra<-mean(x)
z<-qnorm((1+conf.level)/2)
LI <- xbarra - z*sqrt(sigma2)/sqrt(n)
LS <- xbarra + z*sqrt(sigma2)/sqrt(n)
return(c(LI,LS))
}
Se você não estiver interessado em calcular o intervalo de confiança, e sim apenas do resultado final, utilize o t.test()$conf.level