A040991 Primes p such that x^5 = 23 has no solution mod p.

31, 41, 61, 101, 131, 181, 191, 211, 241, 251, 281, 311, 401, 421, 431, 491, 521, 541, 571, 601, 631, 641, 661, 751, 811, 821, 881, 911, 941, 971, 991, 1021, 1031, 1051, 1061, 1091, 1151, 1171, 1181, 1201, 1231, 1291, 1301, 1321, 1361, 1381, 1451, 1471, 1481

Offset

1,1

Comments

Complement of A040990 relative to A000040. - Vincenzo Librandi, Sep 19 2012

Links

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

Mathematica

ok[p_]:= Reduce[Mod[x^5 - 23, p] == 0, x, Integers] == False; Select[Prime[Range[300]], ok] (* Vincenzo Librandi, Sep 19 2012 *)

Prog

(Magma) [p: p in PrimesUpTo(1500) | not exists{x : x in ResidueClassRing(p) | x^5 eq 23} ]; // Vincenzo Librandi, Sep 19 2012

Crossrefs

Sequence in context: A089719 A340444 A109550 * A089721 A089442 A243704

Adjacent sequences: A040988 A040989 A040990 * A040992 A040993 A040994

Keyword

nonn,easy

Author

N. J. A. Sloane.

Status

approved