Or, to give a more precise translation of the select-statement
([:; <@( (+/@])`(*/@])`(>./@])`($0:)@.([: 3:`] @.(0 1 2 e.~ ]) (|{.)))"_1)
R.E. Boss
> -----Oorspronkelijk bericht-----
> Van: [email protected] [mailto:programming-
> [email protected]] Namens Aai
> Verzonden: dinsdag 2 februari 2010 12:30
> Aan: Programming forum
> Onderwerp: Re: [Jprogramming] loopless programming question
>
> 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
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm