OFFSET
1,1
COMMENTS
Sequence A060679 lists all noncyclic numbers, which includes all even numbers >2.
LINKS
T. D. Noe, Table of n, a(n) for n = 1..1000
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
KEYWORD
nonn
AUTHOR
T. D. Noe, Apr 17 2008
STATUS
approved