Roger wrote:
>  icol1=: # - +/@(+./\)@(1&=)

Good one.  A tweak:

   icol2=: +/@(*./\)@(1&~:)

-Dan

----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm

Reply via email to