A040154 Primes p such that x^4 = 23 has a solution mod p.

2, 7, 11, 19, 23, 29, 41, 43, 67, 79, 83, 103, 107, 173, 191, 197, 199, 227, 233, 251, 257, 263, 269, 277, 283, 317, 349, 359, 367, 379, 383, 419, 431, 449, 461, 467, 479, 503, 509, 523, 541, 563, 571, 593, 619

Offset

1,1

Links

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

Mathematica

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

Prog

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

Crossrefs

Cf. A040158.

Sequence in context: A103776 A260889 A289994 * A166862 A105881 A060191

Adjacent sequences: A040151 A040152 A040153 * A040155 A040156 A040157

Keyword

nonn,easy

Author

N. J. A. Sloane.

Status

approved