A049573 Primes p such that x^41 = 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, 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, 277

Offset

1,1

Comments

Differs from A000040: 83 does not occur.

Links

R. J. Mathar, Table of n, a(n) for n = 1..1000

Index entries for related sequences

Mathematica

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

Prog

(Magma) [p: p in PrimesUpTo(300) | exists(t){x : x in ResidueClassRing(p) | x^41 eq 2}]; // Vincenzo Librandi, Sep 14 2012

Crossrefs

Cf. A000040, A059236 for primes not in this sequence.

Sequence in context: A238852 A079152 A124590 * A038616 A228296 A176165

Adjacent sequences: A049570 A049571 A049572 * A049574 A049575 A049576

Keyword

nonn,easy

Author

N. J. A. Sloane

Status

approved