A216753 Primes p such that x^44 = -2 has no solution mod p.

5, 7, 13, 17, 23, 29, 31, 37, 41, 47, 53, 61, 67, 71, 79, 89, 97, 101, 103, 109, 127, 137, 149, 151, 157, 167, 173, 181, 191, 193, 197, 199, 223, 229, 239, 241, 263, 269, 271, 277, 293, 311, 313, 317, 349, 353, 359, 367, 373, 383, 389, 397, 401, 409, 419

Offset

1,1

Comments

Complement of A051091 relative to A000040.

Links

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

Mathematica

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

Prog

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

Crossrefs

Cf. A000040, A051091.

Sequence in context: A216773 A216745 A087155 * A045442 A216777 A216747

Adjacent sequences: A216750 A216751 A216752 * A216754 A216755 A216756

Keyword

nonn,easy

Author

Vincenzo Librandi, Sep 16 2012

Status

approved