A316991 Numbers m such that 1 < gcd(m, 14) < m and m does not divide 14^e for e >= 0.
6, 10, 12, 18, 20, 21, 22, 24, 26, 30, 34, 35, 36, 38, 40, 42, 44, 46, 48, 50, 52, 54, 58, 60, 62, 63, 66, 68, 70, 72, 74, 76, 77, 78, 80, 82, 84, 86, 88, 90, 91, 92, 94, 96, 100, 102, 104, 105, 106, 108, 110, 114, 116, 118, 119, 120, 122, 124, 126, 130, 132
Offset: 1
Examples
6 is in the sequence since gcd(6, 14) = 2 and 6 does not divide 14^e with integer e >= 0. 2 is not in the sequence since 2 | 14. 4 is not in the sequence since 4 | 14^2. 3 and 5 are not in the sequence since they are coprime to 14.
Links
- Michael De Vlieger, Table of n, a(n) for n = 1..10000
Programs
-
Mathematica
With[{nn = 132, k = 14}, Select[Range@ nn, And[1 < GCD[#, k] < #, PowerMod[k, Floor@ Log2@ nn, #] != 0] &]]
Comments