Proper divisors: Difference between revisions
m
→{{header|J}}
m (→{{header|J}}) |
|||
Line 411:
18480 79</lang>
Note that it's a bit more efficient to simply count factors here, when selecting the candidate numbers.
<lang J> (, #@properDivisors)&> 1+I.(= >./) #@factors@> 1+i.20000
| |||