A059225 Primes p such that x^31 = 2 has no solution mod p.

311, 373, 1117, 1303, 1427, 1489, 1861, 2357, 2543, 2729, 2791, 3163, 3659, 3907, 4093, 4217, 4651, 5023, 5147, 5209, 5333, 5519, 5581, 5953, 6263, 6449, 6883, 7069, 7193, 7937, 8123, 8681, 8867, 8929, 9239, 9859, 10789, 11161, 11471, 11657, 11719

Offset

1,1

Comments

Complement of A216883 relative to A000040. - Vincenzo Librandi, Sep 20 2012

Links

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

Mathematica

 ok[p_]:= Reduce[Mod[x^31 - 2, p] == 0, x, Integers] == False; Select[Prime[Range[2000]], ok] (* Vincenzo Librandi, Sep 20 2012  *)

Prog

(Magma) [p: p in PrimesUpTo(12500) | not exists{x : x in ResidueClassRing(p) | x^31 eq 2} ]; // Vincenzo Librandi, Sep 20 2012

Crossrefs

Cf. A000040, A058853.

Sequence in context: A060339 A046016 A142005 * A157717 A113155 A259221

Adjacent sequences: A059222 A059223 A059224 * A059226 A059227 A059228

Keyword

easy,nonn

Author

Klaus Brockhaus, Jan 19 2001

Status

approved