5 ts '*/"1 @ (>@,) t'
5.802976e_5 46784

   5 ts '*/"1 @: >@, t'
5.8685482e_5 50880

   5 ts '*/ @ >@, t'
0.00046500615 74880


R.E. Boss


> -----Oorspronkelijk bericht-----
> Van: [EMAIL PROTECTED] [mailto:programming-
> [EMAIL PROTECTED] Namens Roger Hui
> Verzonden: maandag 7 januari 2008 20:32
> Aan: Programming forum
> Onderwerp: Re: [Jprogramming] Fitting factors of positive integers
> 
> */"1 @ (>@,)  is significantly faster and leaner than */@>@, .
> 
>    t=: <"1 ] 1+2 3 4 5 6 7 [EMAIL PROTECTED] 100
>    ts=: 6!:2 , 7!:[EMAIL PROTECTED]
>    ts '*/@>@, t'
> 0.000522413 75136
>    ts '*/"1 @ (>@,) t'
> 0.000103086 46784
> 
> 
> 
> ----- Original Message -----
> From: Raul Miller <[EMAIL PROTECTED]>
> Date: Monday, January 7, 2008 11:03
> Subject: Re: [Jprogramming] Fitting factors of positive integers
> To: Programming forum <[email protected]>
> 
> > On Jan 7, 2008 1:04 PM, Roger Hui <[EMAIL PROTECTED]> wrote:
> > > fac2=: */"1 @ (>@,) @ { @ (<@(1,*/\)/.~) @ q:
> >
> > fac2a=: */@ >@, @ { @ (<@(1,*/\)/.~) @ q:
> ----------------------------------------------------------------------
> For information about J forums see http://www.jsoftware.com/forums.htm

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

Reply via email to