Raul, Your adv is really slick but I think it misbehaves with a numeric value coinciding with zero. I have suggested a variation.
adv=: (@])(1:`)(@.[)(&>) 1 0 1 +: adv 2;'a'; 3 4 1 6 1 0 1 +: adv 2;2; 3 4 1 6 adv=: (@])(]`)(@.[)(&>) 1 0 1 +: adv 2;2; 3 4 2 6 On Thu, Mar 27, 2014 at 10:32 PM, Raul Miller <[email protected]> wrote: > Or: > > adv=: (@])(1:`)(@.[)(&>) > +:adv > 1:`(+:@])@.[&> > 1 0 1 +: adv 2;'a'; 3 > 4 1 6 > > Thanks, > > -- > Raul > > > -- (B=) ---------------------------------------------------------------------- For information about J forums see http://www.jsoftware.com/forums.htm
