OFFSET
1,1
COMMENTS
a(11) > 10^13. - Giovanni Resta, Aug 12 2019
EXAMPLE
phi(95793434)=43439760=43439759+1=reversal(95793434)+1, so 95793434 is in the sequence.
MATHEMATICA
Do[If[EulerPhi@n==FromDigits@Reverse@IntegerDigits@n+1, Print[n]], {n, 255000000}]
PROG
(PARI) isok(m) = eulerphi(m) == fromdigits(Vecrev(digits(m)))+1; \\ Michel Marcus, Aug 13 2019
CROSSREFS
KEYWORD
nonn,base,more
AUTHOR
Farideh Firoozbakht, Feb 23 2008
EXTENSIONS
a(6)-a(8) from Giovanni Resta, Oct 28 2012
a(9)-a(10) from Giovanni Resta, Aug 12 2019
STATUS
approved