Difference between revisions of "Loop.R"

From Organic Design wiki
m
m
Line 5: Line 5:
  
 
start  <- 1
 
start  <- 1
loop    <- 8
+
loop    <- 6
comp    <- 5
+
comp    <- 4
 
# seq makes a sequence from 1 to 8+5-1
 
# seq makes a sequence from 1 to 8+5-1
 
# %% yields the modulus remainder of a division
 
# %% yields the modulus remainder of a division

Revision as of 00:55, 12 December 2005

  1. ==============================================================================
  2. Loop evaluation e.g. 8 parts, 5 comparisons
  3. ==============================================================================


start <- 1 loop <- 6 comp <- 4

  1. seq makes a sequence from 1 to 8+5-1
  2.  %% yields the modulus remainder of a division

loops <- seq(loop + comp - 1) %% loop

for(i in seq(loop)){

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

}