OFFSET
1,2
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..2000
EXAMPLE
69 is in the sequence because phi(69)=44 which is a palindrome.
MATHEMATICA
Select[Range[600], FromDigits[Reverse[IntegerDigits[EulerPhi[ # ]]]]==EulerPhi[ # ] &] (* Stefan Steinerberger, Apr 24 2006 *)
Select[Range[600], PalindromeQ[EulerPhi[#]]&] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Apr 21 2020 *)
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Luc Stevens (lms022(AT)yahoo.com), Apr 23 2006
EXTENSIONS
Corrected and extended by Stefan Steinerberger, Apr 24 2006
STATUS
approved