OFFSET
1,2
COMMENTS
sigma_13(n) is the sum of the 13th powers of the divisors of n (A013961).
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..5000
MATHEMATICA
Do[If[Mod[DivisorSigma[13, n], n]==0, Print[n]], {n, 1, 50000}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Robert G. Wilson v, Jun 09 2000
STATUS
approved