Unexpected bonus of "J thinking":   

   x=:1e6?@$10

   ts=:6!:2,7!:2@]

   100 ts '1 */\. x'
0.081586 4.19444e7

   100 ts '((*/ .^ * %~)~:&0) x'
0.0448121 1.7828e7

(That's a factor of ~2, at least on my phone).

> On Mar 27, 2014, at 7:49 PM, Dan Bron <[email protected]> wrote:
> 
> ((*/ .^ * %~)~:&0)
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm

Reply via email to