OFFSET
1,2
COMMENTS
Subset of A019424.
EXAMPLE
Divisors of 17490 are 1, 2, 3, 5, 6, 10, 11, 15, 22, 30, 33, 53, 55, 66, 106, 110, 159, 165, 265, 318, 330, 530, 583, 795, 1166, 1590, 1749, 2915, 3498, 5830, 8745, 17490 and their sum is 46656 = 6^6.
MAPLE
with(numtheory): P:=proc(q) local a, k, n;
for n from 1 to q do a:=sort([op(divisors(n))]);
for k from 1 to nops(a) do if sigma(n)=a[k]^6 then print(n); break; fi; od; od; end: P(10^9);
PROG
(PARI) isok(n) = (n==1) || (ispower(s=sigma(n), 6) && !(n % sqrtnint(s, 6))); \\ Michel Marcus, May 05 2018
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Paolo P. Lava, May 04 2018
STATUS
approved