A040169 Primes p such that x^5 = 6 has a solution mod p.

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

Offset

1,1

Links

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

Mathematica

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

Prog

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

Crossrefs

Sequence in context: A029743 A344620 A042990 * A040165 A162950 A259187

Adjacent sequences: A040166 A040167 A040168 * A040170 A040171 A040172

Keyword

nonn,easy

Author

N. J. A. Sloane.

Status

approved