A116022 n*phi(n)*phi(phi(n)) is a palindrome.
1, 2, 3, 4, 309, 618, 9264, 43407
Offset: 1
Examples
43407*phi(43407)*phi(phi(43407)) = 6739855589376.
Crossrefs
Cf. A115891.
Programs
-
Mathematica
Select[Range[44000],PalindromeQ[# EulerPhi[#] EulerPhi[EulerPhi[#]]]&] (* Harvey P. Dale, Oct 04 2024 *)
Comments