A114930 Numbers n such that phi(n)=2*reversal(n).
6180, 27630, 2914830, 4471740, 27000630, 637062480, 27000000630, 679410757980, 4412687534631, 4421625783741
Offset: 1
Examples
637062480 is a term because phi(637062480) = 2*84260736 = 2*reversal(637062480).
Programs
-
Mathematica
Do[If[EulerPhi[n]==2*FromDigits[Reverse[IntegerDigits[n]]], Print[n]], {n, 110000000}]
Extensions
a(6)-a(8) from Giovanni Resta, Oct 28 2012
a(9)-a(10) from Giovanni Resta, Aug 12 2019
Comments