A040979 Primes p such that x^5 = 17 has no solution mod p.

11, 31, 41, 61, 71, 131, 151, 191, 211, 241, 251, 271, 281, 311, 331, 401, 421, 431, 461, 521, 541, 571, 631, 641, 661, 691, 751, 761, 821, 881, 911, 941, 971, 1021, 1051, 1091, 1151, 1171, 1181, 1201, 1291, 1301, 1381, 1451, 1471

Offset

1,1

Comments

Complement of A040978 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 - 17, 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 17} ]; // Vincenzo Librandi, Sep 19 2012

Crossrefs

Sequence in context: A040981 A181603 A040983 * A181182 A089347 A287312

Adjacent sequences: A040976 A040977 A040978 * A040980 A040981 A040982

Keyword

nonn,easy

Author

N. J. A. Sloane.

Status

approved