OFFSET
1,2
COMMENTS
If p = 480...023 is prime, then k = 3*p = 1440...069 and phi(k) = 960...044, thus k belongs to the sequence.
EXAMPLE
phi(1_440069) = 960044.
MATHEMATICA
lst = {}; Do[If[{}!= StringPosition[ToString@n, StringReverse@ToString@EulerPhi@n], AppendTo[lst, n], {n, 2*10^7}]; lst
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Giovanni Resta, Jan 26 2006
EXTENSIONS
a(19)-a(27) from Donovan Johnson, May 11 2010
STATUS
approved