login
A218582
Primes which do not divide any Mersenne number M(p) = 2^p - 1 with prime p.
1
2, 5, 11, 13, 17, 19, 29, 37, 41, 43, 53, 59, 61, 67, 71, 73, 79, 83, 97, 101, 103, 107, 109, 113, 131, 137, 139, 149, 151, 157, 163, 173, 179, 181, 191, 193, 197, 199, 211, 227, 229, 239, 241, 251, 257, 269, 271, 277, 281, 283, 293, 307, 311, 313, 317, 331, 337
OFFSET
1,1
LINKS
Arkadiusz Wesolowski, Table of n, a(n) for n = 1..10000
MATHEMATICA
Select[Prime@Range[68], ! PrimeQ@MultiplicativeOrder[2, #] &]
PROG
(Magma) [p: p in PrimesInInterval(2, 337) | not IsPrime(Modorder(2, p))]
CROSSREFS
Complement in primes of A122094. Subsequence of A138837.
Sequence in context: A075749 A138837 A038899 * A118753 A337649 A305033
KEYWORD
nonn
AUTHOR
STATUS
approved