OFFSET
1,2
COMMENTS
sigma_3(k) is the sum of the cubes of the divisors of n (A001158).
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..282 (terms below 10^10)
MATHEMATICA
Do[If[Mod[DivisorSigma[3, n]-EulerPhi[n]^3, n]==0, Print[n]], {n, 1, 2*10^5}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Robert G. Wilson v, Jun 09 2000
EXTENSIONS
More terms from Sean A. Irvine, Apr 03 2022
STATUS
approved