There might be simpler expressions, but:
   factors=: [: /:~@,@(p:@[EMAIL PROTECTED] */@:^"1 [: >@{ i.&.> ) 1 + _ q: ]
   ,.factors&.>1+i.10
+--------+
|1       |
+--------+
|1 2     |
+--------+
|1 3     |
+--------+
|1 2 4   |
+--------+
|1 5     |
+--------+
|1 2 3 6 |
+--------+
|1 7     |
+--------+
|1 2 4 8 |
+--------+
|1 3 9   |
+--------+
|1 2 5 10|
+--------+

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

Reply via email to