
25 Mar
2014
25 Mar
'14
03:04
Este código não funciona. O seu loop for tá sobre escrevendo resultados em cor.mult<- cor.test(x, y[,i]) e portanto somente o ultimo está sendo guardado (note tb que sua matrz de dados esá reciclando valores) Uma sugestão: x <- 1:10 y <- matrix(rnorm(200), nrow=10) apply(y, 2, function(y, x=x) cor.test(x,y)$p.value