login
A065528
Numbers n such that phi(n) is a nontrivial power b^c where b > 1 and c > 1.
3
5, 8, 10, 12, 15, 16, 17, 20, 24, 30, 32, 34, 37, 40, 48, 51, 57, 60, 63, 64, 68, 74, 76, 80, 85, 96, 101, 102, 108, 114, 120, 125, 126, 128, 136, 160, 170, 185, 192, 197, 202, 204, 219, 240, 247, 250, 255, 256, 257, 259, 272, 273, 285, 292, 296, 304, 315, 320, 327, 333
OFFSET
1,1
COMMENTS
What values of b can occur?
Apparently all even numbers can occur as values of b. Checked up to 50000; see A227533. - Charles R Greathouse IV, Jul 15 2013
LINKS
Charles R Greathouse IV, Table of n, a(n) for n = 1..10000
FORMULA
a(n) = A166955(n+2). - Juri-Stepan Gerasimov, Oct 25 2009
EXAMPLE
phi(63) = 6^2, phi(96) = 2^5.
MATHEMATICA
ppQ[n_] := GCD @@ Last /@ FactorInteger@ n > 1; Select[ Range@ 330, ppQ@ EulerPhi@ # &] (* Robert G. Wilson v, Jul 16 2013 *)
PROG
(PARI) v=[]; for(n=2, 333, if(ispower(eulerphi(n)), v=concat(v, n))); v (Hobson)
(PARI) is(n)=ispower(eulerphi(n)) \\ Charles R Greathouse IV, Jul 15 2013
CROSSREFS
Cf. A166955.
Sequence in context: A314378 A314379 A153663 * A360398 A050936 A084146
KEYWORD
nonn,easy
AUTHOR
Joseph L. Pe, Nov 27 2001
EXTENSIONS
More terms from Nick Hobson, Nov 29 2006
b-file from Charles R Greathouse IV, Mar 25 2010
STATUS
approved