<html><body><div style="color:#000; background-color:#fff; font-family:Courier New, courier, monaco, monospace, sans-serif;font-size:10pt">Rodrigo, tem uma rotina no pacote Hmisc que talvez possa te ajudar.<br><br>require(Hmisc)<br>?rcorr<br><br>x <- c(-2, -1, 0, 1, 2)<br>y <- c(4, 1, 0, 1, 4)<br>z <- c(1, 2, 3, 4, NA)<br>v <- c(1, 2, 3, 4, 5)<br>rcorr(cbind(x,y,z,v))<br><div><span><br></span></div><div>[ ]'s. <br></div><div>Edson Lira<br>Estatístico<br>Manaus-Amazonas</div><div style="display: block;" class="yahoo_quoted"> <br> <br> <div style="font-family: Courier New, courier, monaco, monospace, sans-serif; font-size: 10pt;"> <div style="font-family: HelveticaNeue, Helvetica Neue, Helvetica, Arial, Lucida Grande, sans-serif; font-size: 12pt;"> <div dir="ltr"> <font face="Arial" size="2"> Em Segunda-feira, 24 de Março de 2014 23:04, Mauro Sznelwar <sznelwar@uol.com.br> escreveu:<br> </font>
</div> <div class="y_msg_container"><div id="yiv8360823596">
<style></style>
<div>
<div><font face="Arial" size="2"><font color="#0000ff" size="3">Este código não
funciona.</font><br></font></div>
<div><font face="Arial" size="2"></font> </div>
<div><font face="Arial" size="2">O seu loop for tá sobre escrevendo resultados
em<br>cor.mult<- cor.test(x, y[,i])<br>e portanto somente o ultimo está
sendo guardado<br><br>(note tb que sua matrz de dados esá reciclando
valores)<br><br>Uma sugestão:<br><br>x <- 1:10<br>y <- matrix(rnorm(200),
nrow=10)<br>apply(y, 2, function(y, x=x)
cor.test(x,y)$p.value<br><br><br></font></div></div></div><br>_______________________________________________<br>R-br mailing list<br><a ymailto="mailto:R-br@listas.c3sl.ufpr.br" 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><br></div> </div> </div> </div> </div></body></html>