OFFSET
1,2
LINKS
Marius A. Burtea, Table of n, a(n) for n = 1..3648 (terms 1..1000 from Donovan Johnson; a(1211) re-indexed and duplicate a(2311) removed by Georg Fischer, Mar 21 2022).
Frits Beukers, Florian Luca and Frans Oort, Power Values of Divisor Sums, The American Mathematical Monthly, Vol. 119, No. 5 (May 2012), pp. 373-380.
PROG
(PARI) lista(nn) = {for (i=1, nn, s = sigma(i); if (s == 1 || ispower(s, 5), print1(i, ", ")); ); } \\ Michel Marcus, Jun 12 2013
(Magma) [n:n in [1..10000]| IsPower(SumOfDivisors(n), 5)]; // Marius A. Burtea, Apr 17 2019
CROSSREFS
KEYWORD
nonn
AUTHOR
STATUS
approved