Loop.R

1. ==============================================================================
2. Loop evaluation e.g. 6 parts, 4 comparisons
3. this function is construting an array e.g. 1,2,3,4,5,6,1,2,3
4. and then subsetting sequential arrays of length four from it
5. e.g. 1,2,3,4 2,3,4,5 3,4,5,6 etc
6. ==============================================================================

start <- 1 loop <- 6 comp <- 4 loops <- 0:(loop+comp-1) %% loop +1

for(i in seq(loop)){

 print(loops[seq(from=i, length=comp)])

}