A040161 Primes p such that x^5 = 3 has a solution mod p.

2, 3, 5, 7, 13, 17, 19, 23, 29, 37, 41, 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, 223, 227, 229, 233, 239, 257, 263, 269, 277, 283, 293, 307, 313, 317, 337, 347, 349, 353, 359, 367, 373

Offset

1,1

Links

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

Mathematica

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

Prog

(Magma) [ p: p in PrimesUpTo(400) | exists(t){x : x in ResidueClassRing(p) | x^5 eq 3} ]; // Klaus Brockhaus, Jun 03 2009

Crossrefs

Cf. A040162 (primes p such that x^5 = 3 has no solution mod p).

Sequence in context: A162950 A259187 A040972 * A175438 A040970 A216862

Adjacent sequences: A040158 A040159 A040160 * A040162 A040163 A040164

Keyword

nonn,easy

Author

N. J. A. Sloane

Extensions

More terms from Klaus Brockhaus, Jun 03 2009

Status

approved