Hello R experts, 

I'm new to R and I'm wanting to know what is the best way to speed up my code. 
I've read that you can vectorize the code but I'm unsure on how to implement 
this into my code.


df <- data.frame(31790,31790)

for (i in 1:31790) 
{
  for (j in i:31790) 
  {
    ken<-cor(cldm[i,3:17],cldm[j,3:17], method="kendall", use="pairwise")
    dis2<-deg.dist(cldm[i,2],cldm[i,1],cldm[j,2],cldm[j,1])
    
    df[i,j]<-ifelse(dis2<=500,ken,NA)
    }
  } 
df

Thanks!                                           
______________________________________________
R-help@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.

Reply via email to