A241046 Primes having primitive roots 2, 3, 5, 7, and 11.

173, 293, 677, 2083, 2477, 3533, 3797, 4133, 4157, 4373, 4603, 4637, 5477, 5717, 5923, 6173, 7013, 9173, 9533, 9677, 10853, 11587, 12437, 13037, 13397, 13613, 13877, 14717, 14957, 15077, 15413, 16253, 17093, 17573, 17597, 18413, 18773, 18917, 19157, 19997

Offset

1,1

Links

T. D. Noe, Table of n, a(n) for n = 1..1000

Mathematica

fQ[p_, n_] := MultiplicativeOrder[p, n] == n - 1; Select[Prime[Range[2300]], fQ[2, #] && fQ[3, #] && fQ[5, #] && fQ[7, #] && fQ[11, #] &]

Crossrefs

Cf. A001122, A001123, A001124, A001126, A019339, A213052.

Sequence in context: A063645 A142607 A241045 * A142206 A343449 A142004

Adjacent sequences: A241043 A241044 A241045 * A241047 A241048 A241049

Keyword

nonn

Author

T. D. Noe, Apr 16 2014

Status

approved