<html>
<head>
<style><!--
.hmmessage P
{
margin:0px;
padding:0px
}
body.hmmessage
{
font-size: 10pt;
font-family:Tahoma
}
--></style></head>
<body class='hmmessage'><div dir='ltr'>
<div> Boa noite pessoal, estou tentando criar uma matriz com os intervalos de confiança que eu calculei para os um conjunto de dados. No entanto, os valores calculados para o intervalo de confiança ficaram ocultos na matriz.</div><div><span style="font-size: 10pt;"> </span></div><div><br></div><div><div>ic<- function(x, sigma2, conf.level=0.95){ </div><div> n <- length(x) </div><div> xbarra <- mean(x) </div><div> if (!missing(sigma2)){ </div><div> z <- qnorm((1+conf.level)/2) </div><div> }else{ </div><div> sigma2 <- var(x) </div><div> z <- qt((1+conf.level)/2, n-1) </div><div> } </div><div> return(mean(x)+c(-1, 1)*z*sqrt(sigma2)/sqrt(n)) </div><div>}</div><div><br></div><div>tr<-gl(3,4)</div><div>resp<-rnorm(12,30,5)</div><div>d<-data.frame(tr,resp)</div><div>int.conf<-tapply(resp,tr,ic)</div><div>mat<-matrix(int.conf)</div><div>mat</div><div><br></div><div># matriz obtida.</div><div><span style="font-size: 10pt;"> [,1] </span></div></div><div>[1,] Numeric,2</div><div>[2,] Numeric,2</div><div>[3,] Numeric,2</div><div><br></div><div>Agradeço desde já pela ajuda.</div><div><br></div><div>Att.</div><div><br></div><div>Tiago.</div> </div></body>
</html>