OFFSET
1,1
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..250
EXAMPLE
phi(44) + 44 = 64 = 4^3.
MATHEMATICA
Select[Range[40000], IntegerQ[Surd[EulerPhi[#]+#, 3]]&] (* Harvey P. Dale, Jan 07 2020 *)
PROG
(PARI) isok(n) = ispower(eulerphi(n) + n, 3); \\ Michel Marcus, Jan 22 2014
CROSSREFS
KEYWORD
nonn
AUTHOR
Giovanni Resta, Feb 13 2006
STATUS
approved