Jimmy's original rg outperforms both tock and the best of
my various attempts at "new" for "larger" problems, eg
10 ts 'rg^:10000 #~400'
0.633403 38272
10 ts 'tock^:10000 #~400'
0.751826 34816
10 ts 'new^:10000 #~400'
0.793394 39424
NB. less good on smaller ones
30 ts 'rg^:10000 #~10'
0.10968 6784
30 ts 'tock^:10000 #~10'
0.0662844 3840
30 ts 'new^:10000 #~10'
0.0633482 3968
(Have you looked at Raul's results table, posted on 20/7?)
The original problem asked us to consider 100 players,
but, as usual, it's one thing to solve a small puzzle that you
can get your head round, but very often a much more challenging
requirement to get it to scale up.
Those many Project Euler problems are worth looking at with
scale of application in mind. ( //projecteuler.net )
Thanks,
Mike
On 27/07/2017 05:54, Raul Miller wrote:
Oh, well, you could make it tacit. For example:
rg=:(((#/.~@])`(~.@])`(0*[)} +/?@##)+-) *
That does not speed it up, though.
Anyways, good luck,
---
This email has been checked for viruses by Avast antivirus software.
https://www.avast.com/antivirus
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm