A218582 Primes which do not divide any Mersenne number M(p) = 2^p - 1 with prime p.

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

Adjacent sequences: A218579 A218580 A218581 * A218583 A218584 A218585

Keyword

nonn

Author

Arkadiusz Wesolowski, Nov 03 2012

Status

approved