rojaff / langen_pipeline Goto Github PK

Hello everyone,

I have a simple problem with this loop in the section (Correlations of each candidate SNP with the environmental predictors):

foo <- matrix(nrow=(ncand), ncol=4) # 4 columns for 4 predictors
colnames(foo) <- c("ID","POP","SURFACE","ALTITUDE")

for (i in 1:length(cand$snp)) {
nam <- cand[i,2]
snp.gen <- gen.imp[,nam]
foo[i,] <- apply(pred,2,function(x) cor(x,snp.gen))
}

#Error in cor(x, snp.gen) : 'x' must be numeric

I understand that cor is a correlation, but in the x section what kind of input should I add to the loop in this case?

Thank you very much for your help