Indices more compact:
([:; <@( (+/@])`(*/@])`(>./@])`($0:)@.(3 <. (|{.)))"_1)
Hallo R.E. Boss, je schreef op 02-02-10 11:52:
> Or tacitly (NB. wrap around)
>
> (5 ?...@$ 4) ([:; <@( (+/@])`(*/@])`(>./@])`($0:)@.([: ]`3:@.(2<]) (|{.))
> )"0 1) 5 4 ?...@$ 20
> 52 19 38 30
>
>
>
>
--
Met vriendelijke groet,
=@@i
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
