A216748 Primes p such that x^34 = -2 has no solution mod p.

5, 7, 13, 23, 29, 31, 37, 47, 53, 61, 71, 79, 101, 103, 109, 127, 137, 149, 151, 157, 167, 173, 181, 191, 197, 199, 223, 229, 239, 263, 269, 271, 277, 293, 307, 311, 317, 349, 359, 367, 373, 383, 389, 397, 409, 421, 431, 439, 443, 461, 463, 479, 487, 503, 509, 541, 557, 599

Offset

1,1

Comments

Complement of A051086 relative to A000040.

Links

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

Mathematica

ok[p_]:=Reduce[Mod[x^34 + 2, p] == 0, x, Integers] == False; Select[Prime[Range[200]], ok]

Prog

(Magma) [ p: p in PrimesUpTo(600) | not exists{x : x in ResidueClassRing(p) | x^34 eq -2} ];

Crossrefs

Cf. A000040, A051086.

Sequence in context: A216774 A216742 A216744 * A216768 A216750 A003628

Adjacent sequences: A216745 A216746 A216747 * A216749 A216750 A216751

Keyword

nonn,easy

Author

Vincenzo Librandi, Sep 16 2012

Status

approved