A040116 Primes p such that x^4 = 9 has a solution mod p.

2, 3, 7, 11, 13, 19, 23, 31, 37, 43, 47, 59, 61, 67, 71, 73, 79, 83, 97, 103, 107, 109, 127, 131, 139, 151, 157, 163, 167, 179, 181, 191, 193, 199, 211, 223, 227, 229, 239, 241, 251, 263, 271, 277, 283, 307, 311

Offset

1,1

Links

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

Mathematica

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

Prog

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

Crossrefs

Sequence in context: A106483 A145673 A321657 * A155153 A014580 A197227

Adjacent sequences: A040113 A040114 A040115 * A040117 A040118 A040119

Keyword

nonn,easy

Author

N. J. A. Sloane.

Status

approved