Hello R users,
I would like to reduce the number of for loops in my code. I build these
matrices (50000 times). The main diagonal are 1s and the two sides along the
main diagonal mirror each other as follows:
i<-5
fi<-matrix(0,nrow=i,ncol=i)#floral inhibition matrix for(r in 1:i){ for(c in
1:i){ if(r==c){ fi[r,c]<-1 }else if(r<c){ fi[r,c]<-1-runif(1)^.5 }else{
fi[r,c]<-fi[c,r] } } }
fi
Any thoughts?
Sincerely,
Brian
[[alternative HTML version deleted]]
______________________________________________
[email protected] 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.
