Here's another (straightforward) variant: E=: +/ % # SD=: %:@E@:*:@:- E COR=: E@:*&(- E) % *&SD
-- Raul ---------------------------------------------------------------------- For information about J forums see http://www.jsoftware.com/forums.htm
Here's another (straightforward) variant: E=: +/ % # SD=: %:@E@:*:@:- E COR=: E@:*&(- E) % *&SD
-- Raul ---------------------------------------------------------------------- For information about J forums see http://www.jsoftware.com/forums.htm