|
|
A072395
|
|
Numbers n such that reverse(phi(n)) = n.
|
|
4
|
|
|
1, 21, 63, 291, 2991, 6102, 46676013, 69460293, 2346534651, 6313047393, 23400000651, 80050617822, 234065340651, 234659934651, 2340000000651, 2934000006591
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
|
|
LINKS
|
|
|
EXAMPLE
|
reverse(phi(6102)) = reverse(2016) = 6102, so 6102 is a term of the sequence.
|
|
MATHEMATICA
|
Select[Range[10^5], FromDigits[Reverse[IntegerDigits[EulerPhi[#]]]] == # &] (* corrected by Harvey P. Dale, Oct 03 2011 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base,more
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|