<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META content="text/html; charset=iso-8859-1" http-equiv=Content-Type>
<META name=GENERATOR content="MSHTML 8.00.6001.23569">
<STYLE></STYLE>
</HEAD>
<BODY>
<DIV><FONT size=2 face=Arial><FONT color=#0000ff size=3>Este código não
funciona.</FONT><BR></FONT></DIV>
<DIV><FONT size=2 face=Arial></FONT> </DIV>
<DIV><FONT size=2 face=Arial>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></BODY></HTML>