A059241 Primes p such that x^11 = 2 has no solution mod p.

23, 67, 89, 199, 353, 397, 419, 463, 617, 661, 683, 727, 859, 881, 947, 991, 1123, 1277, 1409, 1453, 1607, 1783, 1871, 2003, 2069, 2113, 2179, 2267, 2311, 2333, 2377, 2399, 2531, 2663, 2707, 2729, 2861, 2927, 2971, 3037, 3169, 3191, 3257, 3301, 3323

Offset

1,1

Comments

Complement of A049543 relative to A000040.

Links

Vincenzo Librandi, Table of n, a(n) for n = 1..1000

Mathematica

ok[p_]:= Reduce[Mod[x^11 - 2, p] == 0, x, Integers] == False; Select[Prime[Range[1000]], ok] (* Vincenzo Librandi, Sep 20 2012  *)

Prog

(Magma) [p: p in PrimesUpTo(3500) | not exists{x : x in ResidueClassRing(p) | x^11 eq 2} ]; // Vincenzo Librandi, Sep 20 2012

Crossrefs

Cf. A000040, A049543.

Sequence in context: A104945 A141849 A125873 * A241212 A052087 A030458

Adjacent sequences: A059238 A059239 A059240 * A059242 A059243 A059244

Keyword

easy,nonn

Author

Klaus Brockhaus, Jan 21 2001

Status

approved