A040152 Primes p such that x^4 = 22 has a solution mod p.

2, 3, 7, 11, 13, 59, 61, 67, 79, 89, 97, 109, 127, 137, 151, 163, 167, 173, 179, 239, 251, 257, 263, 271, 293, 331, 353, 359, 379, 401, 419, 431, 433, 439, 443, 467, 479, 499, 503, 521, 541, 587, 607, 613, 619

Offset

1,1

Links

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

Mathematica

ok [p_]:=Reduce[Mod[x^4 - 22, 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 22}]; // Vincenzo Librandi, Sep 12 2012

Crossrefs

Sequence in context: A038895 A291657 A113244 * A323353 A188529 A369692

Adjacent sequences: A040149 A040150 A040151 * A040153 A040154 A040155

Keyword

nonn,easy

Author

N. J. A. Sloane.

Status

approved