A040095 Primes p such that x^3 = 23 has a solution mod p.

2, 3, 5, 11, 17, 23, 29, 31, 37, 41, 47, 53, 59, 61, 71, 83, 89, 101, 103, 107, 109, 113, 131, 137, 139, 149, 157, 163, 167, 173, 179, 191, 193, 197, 211, 227, 233, 239, 241, 251, 257, 263, 269, 271, 281, 293, 311

Offset

1,1

Comments

Complement of A040096 relative to A000040. - Vincenzo Librandi, Sep 13 2012

Links

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

Mathematica

ok [p_]:=Reduce[Mod[x^3 - 23, p] == 0, x, Integers] =!= False;  Select[Prime[Range[180]], ok] (* Vincenzo Librandi, Sep 11 2012 *)

Prog

(Magma) [p: p in PrimesUpTo(450) | exists(t){x : x in ResidueClassRing(p) | x^3 eq 23}]; // Vincenzo Librandi, Sep 11 2012

Crossrefs

Cf. A000040, A040096.

Sequence in context: A274386 A079545 A154755 * A040028 A049589 A049583

Adjacent sequences: A040092 A040093 A040094 * A040096 A040097 A040098

Keyword

nonn,easy

Author

N. J. A. Sloane.

Status

approved