A040974 Primes p such that x^5 = 15 has a solution mod p.

2, 3, 5, 7, 13, 17, 19, 23, 29, 37, 43, 47, 53, 59, 67, 73, 79, 83, 89, 97, 103, 107, 109, 113, 127, 137, 139, 149, 157, 163, 167, 173, 179, 193, 197, 199, 211, 223, 227, 229, 233, 239, 241, 257, 263, 269, 277, 283

Offset

1,1

Comments

Complement of A040975 relative to A000040. - Bruno Berselli, Sep 13 2012

Links

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

Mathematica

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

Prog

(Magma) [p: p in PrimesUpTo(400) | exists(t){x : x in ResidueClassRing(p) | x^5 eq 15}]; // Vincenzo Librandi, Sep 12 2012

Crossrefs

Cf. A000040, A040975.

Sequence in context: A040980 A040159 A040171 * A049557 A042991 A162338

Adjacent sequences: A040971 A040972 A040973 * A040975 A040976 A040977

Keyword

nonn,easy

Author

N. J. A. Sloane.

Status

approved