A little simpler I think, although it does use a hook to preprocess r
m (({ each)"1 0 <"1) r
┌───────┬─────┬───┬─┐
│9 8 6 1│2 2 2│6 8│7│
├───────┼─────┼───┼─┤
│5 4 8 4│2 7 9│1 4│1│
├───────┼─────┼───┼─┤
│4 3 3 7│7 0 6│7 6│6│
└───────┴─────┴───┴─┘
Cheers, bob
> On Apr 7, 2020, at 11:00, Brian Schott <[email protected]> wrote:
>
> m(;@:((1{.~#)&.>)@[ <;.1 ])"1 r
>
>
> --
> (B=)
> ----------------------------------------------------------------------
> For information about J forums see http://www.jsoftware.com/forums.htm
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
