|
| |
|
|
A078165
|
|
phi[n] is a perfect 5th power.
|
|
8
| |
|
|
1, 2, 51, 64, 68, 80, 96, 102, 120, 1285, 2048, 2056, 2176, 2560, 2570, 2720, 3072, 3084, 3264, 3840, 4080, 7957, 8227, 8279, 9079, 9139, 9709, 9919, 10355, 10595, 11667, 11673, 11691, 12099, 12393, 12483, 12753, 12987, 13797, 14715, 14763
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
EXAMPLE
| phi of the sequence includes 1,32,1024,7776...; powers arise several times; a(3)=A053576[5]=51
|
|
|
MATHEMATICA
| k=5; Do[s=EulerPhi[n]^(1/k); If[IntegerQ[s], Print[n]], {n, 1, 5000}]
|
|
|
CROSSREFS
| Cf. A039770[square], A039771[cube], A078164[4th], A078165[5th], A078166[6th], A078167[7th], A078168[8th], A078169[9th], A078170[10th power], A001317, A053576, A045544, A000010.
Sequence in context: A203746 A057943 A037419 * A180110 A037058 A106042
Adjacent sequences: A078162 A078163 A078164 * A078166 A078167 A078168
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Labos E. (labos(AT)ana.sote.hu), Nov 27 2002
|
| |
|
|
