Better:
# ;@:((] <@,"1 0`(<@[)@.(0 = #@]) G ({:"1@] #~ (= {."1))~ {:)&.>)^:_ <0
39
H=. (#~12~:{."1) G
# it=.;@:((] <@,"1 0`(<@[)@.(0 = #@]) H ({:"1@] #~ (= {."1))~
{:)&.>)^:_ <0
29
,. 5 {. it
┌────────────────────┐
│0 1 2 3 5 7 9 11 13 │
├────────────────────┤
│0 1 2 3 5 7 9 11 14 │
├────────────────────┤
│0 1 2 3 5 7 9 11 15 │
├────────────────────┤
│0 1 2 3 5 7 10 12 │
├────────────────────┤
│0 1 2 3 5 7 10 11 13│
└────────────────────┘
,._4 {. it
┌────────────────────┐
│0 1 2 4 5 8 10 12 │
├────────────────────┤
│0 1 2 4 5 8 10 11 13│
├────────────────────┤
│0 1 2 4 5 8 10 11 14│
├────────────────────┤
│0 1 2 4 5 8 10 11 15│
└────────────────────┘
--
Met vriendelijke groet,
@@i = Arie Groeneveld
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
