|
Search: id:A112721
|
|
|
| A112721 |
|
Numbers n such that phi(n)=d_1^1+d_2^2+...+d_k^k where d_1 d_2 ... d_k is the decimal expansion of n. |
|
+0
2
|
|
| 1, 44, 84, 5676, 32186, 35097, 128476, 527048, 700298, 12141094, 43874279, 58730238
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
COMMENT
|
There is no further term up to 3*10^7.
|
|
EXAMPLE
|
phi(12141094)=1^1+2^2+1^3+4^4+1^5+0^6+9^7+4^8 so 12141094 is in
the sequence.
|
|
MATHEMATICA
|
Do[d=IntegerDigits[n]; k=Length[d]; If[EulerPhi[n]==Sum[d[[j]]^j, {j, k}], Print[n]], {n, 30000000}]
|
|
CROSSREFS
|
Cf. A032799, A035138, A112718-20.
Sequence in context: A043989 A050272 A116611 this_sequence A118087 A044182 A044563
Adjacent sequences: A112718 A112719 A112720 this_sequence A112722 A112723 A112724
|
|
KEYWORD
|
base,fini,more,nonn
|
|
AUTHOR
|
Farideh Firoozbakht (mymontain(AT)yahoo.com), Sep 17 2005
|
|
EXTENSIONS
|
"a(11) - a(12) from". Farideh Firoozbakht (mymontain(AT)yahoo.com), Jan 04 2009
|
|
|
Search completed in 0.002 seconds
|
