A216883 Primes p such that x^31 = 2 has a solution mod p.

2, 3, 5, 7, 11, 13, 17, 19, 23, 29, 31, 37, 41, 43, 47, 53, 59, 61, 67, 71, 73, 79, 83, 89, 97, 101, 103, 107, 109, 113, 127, 131, 137, 139, 149, 151, 157, 163, 167, 173, 179, 181, 191, 193, 197, 199, 211, 223, 227, 229, 233, 239, 241, 251, 257, 263, 269, 271

Offset

1,1

Comments

Complement of A059225 relative to A000040.

Links

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

Mathematica

ok[p_] := Reduce[Mod[x^31 - 2, p] == 0, x, Integers] == True; Select[Prime[Range[150]], ok]

Prog

(Magma) [p: p in PrimesUpTo(400) | exists(t){x : x in ResidueClassRing(p) | x^31 eq 2}];

Crossrefs

Sequence in context: A182986 A000040 A008578 * A216884 A216885 A216886

Adjacent sequences: A216880 A216881 A216882 * A216884 A216885 A216886

Keyword

nonn,easy

Author

Vincenzo Librandi, Sep 19 2012

Status

approved