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

Author

T. D. Noe, Apr 16 2014

Keywords

• nonn

Links

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

Crossrefs

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

Programs

Mathematica

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