Thank you all for the replies, exactly what I was after.

My favourite is Bo Jacoby's
((#~(=|.&.":"0)@(*9&+))@i.)2000

I was hoping someone would reply with a monadic variant. Will study
the others, thanks

On Tue, Aug 25, 2009 at 5:11 PM, Brian Schott<[email protected]> wrote:
> I think this one is a little faster and leaner, but was harder for me
> to construct.
>
> 10 {. n #~ (-: |.)&(":@(* 9+])"0) n=: >:i.12000
>
> --
> (B=)
> ----------------------------------------------------------------------
> 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