login
A139392
Odd noncyclic numbers; odd numbers n such that gcd(n,phi(n)) > 1.
2
9, 21, 25, 27, 39, 45, 49, 55, 57, 63, 75, 81, 93, 99, 105, 111, 117, 121, 125, 129, 135, 147, 153, 155, 165, 169, 171, 175, 183, 189, 195, 201, 203, 205, 207, 219, 225, 231, 237, 243, 245, 253, 261, 273, 275, 279, 285, 289, 291, 297, 301, 305, 309, 315, 325
OFFSET
1,1
COMMENTS
Sequence A060679 lists all noncyclic numbers, which includes all even numbers >2.
MATHEMATICA
Select[Range[1, 400, 2], GCD[ #, EulerPhi[ # ]]>1&]
PROG
(PARI) is(n)=n%2 && gcd(eulerphi(n), n)>1 \\ Charles R Greathouse IV, Aug 23 2017
CROSSREFS
Cf. A003277 (cyclic numbers).
Sequence in context: A262748 A138786 A305733 * A274720 A338318 A322336
KEYWORD
nonn
AUTHOR
T. D. Noe, Apr 17 2008
STATUS
approved