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]]

______________________________________________
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