login
A059241
Primes p such that x^11 = 2 has no solution mod p.
2
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
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
Sequence in context: A104945 A141849 A125873 * A241212 A052087 A030458
KEYWORD
easy,nonn
AUTHOR
Klaus Brockhaus, Jan 21 2001
STATUS
approved