f9seq=: 3 : ';@:{&(1;0 1)^:y 0'
f9a =: +/ @ f9seq
f9a"0 [>:i.5
1 1 2 3 5
[d=:4*2#7#"1,.1 1.5 2 3 5
4 4 4 4 4 4 4
4 4 4 4 4 4 4
6 6 6 6 6 6 6
6 6 6 6 6 6 6
8 8 8 8 8 8 8
8 8 8 8 8 8 8
12 12 12 12 12 12 12
12 12 12 12 12 12 12
20 20 20 20 20 20 20
20 20 20 20 20 20 20
2011/12/11 Linda Alvord <[email protected]>
>
>
> -----Original Message-----
> From: Linda Alvord [mailto:[email protected]]
> Sent: Sunday, December 11, 2011 10:27 AM
> d=:7#"1 ,.2#4 6 8 12 20 NB. Create array
> d
> 4 4 4 4 4 4 4
> 4 4 4 4 4 4 4
> 6 6 6 6 6 6 6
> 6 6 6 6 6 6 6
> 8 8 8 8 8 8 8
> 8 8 8 8 8 8 8
> 12 12 12 12 12 12 12
> 12 12 12 12 12 12 12
> 20 20 20 20 20 20 20
> 20 20 20 20 20 20 20
>
>
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm