It probably is usable as well:
ads=: +/^:2 @:*:@(-/~)
U=.(,distrib)^:(20) i. 0 0
(ds"1,:ads"1)(+/&>)"1 U
9 9 9 9 13 9 9 9 13 13 3 3 9 7 7 3 19 19 17 17 3 3 3 9 13 11 7
3 13 11 11 13
38 38 38 38 70 54 54 38 70 70 6 6 38 22 22 6 150 150 118 134 6 6 6 54 70 54 22
6
70 54 54 70
Hallo R.E. Boss, je schreef op 19-04-11 17:39:
>
> In the original specs the distance of the bucketsums is defined by
>
> +/^:2 @:*:@(-/~)
>
> It may lead to different solutions with your ds.
>
>
--
Met vriendelijke groet,
=@@i
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
