Me desculpem a ignorância, porém sou novo como usuário e estou tentando criar uma função para facilitar uma operação no meu banco de dados.
dados = as.data.frame(matrix(rnorm(200), ncol=10, nrow=50))
cor.multipla <- function(x, y){
n <- ncol(y)
cor.mult <- numeric(0)
+ for(i in 1:n){cor.mult<- cor.test(x, y[,i])
+ return(cor.mult$p.value)}
}
cor.multipla(dados$V1, dados[2:10])
Nesta função, eu gostaria fazer a correlação da coluna 1 com as colunas de 2 a 10, e extrair um vetor de p.value para cada correlação, no entanto, a função está me retornando apenas um valor de p.value.
Alguém poderia me dizer onde eu estou errando ou mesmo se estou indo pelo caminho errado?
Desde já agradeço...
--
Rodrigo A. MunizEng. Agrônomo. Ms Produção Vegetal (UENF)
Doutorando em Engenharia de Sistemas Agrícolas (ESALQ/USP)
Cel (19) 8300-4333 (Pessoal)
Tel (19) 3375-1196 (Residêncial)
Tel (19) 3447-8537 (Trabalho)