Numbers which are the cube roots of the product of their proper divisors: Difference between revisions
Content added Content deleted
(J) |
m (→{{header|J}}) |
||
Line 22: | Line 22: | ||
=={{header|J}}== |
=={{header|J}}== |
||
Note that the cube root of the proper divisors is the fourth root of all divisors of a positive integer. That said, we do not need to find roots here: |
Note that the cube root of the proper divisors is the fourth root of all divisors of a positive integer. That said, we do not need to find roots here: |
||
<syntaxhighlight lang=J>F=: ('';1 1 1;1 3;,7) e.~ __ <@/:~@{:@q:"0 ]</ |
<syntaxhighlight lang=J>F=: ('';1 1 1;1 3;,7) e.~ __ <@/:~@{:@q:"0 ]</syntaxhighlight> |
||
Task examples: |
Task examples: |