On Mon, Jun 8, 2009 at 8:53 AM, Mike Day<[email protected]> wrote:
> But 72 isn't a perfect power.
> So it looks as if Raul's function needs a bit of extra filtering to

Oops, thank you!

   pp=: *./@(1...@~., 2&<:, 0&<@#)@(#/....@q: ::0:"0)

(And extra filtering will not make mine faster).

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

Reply via email to