A061332 Primes with 20 as smallest positive primitive root.

107227, 151537, 235747, 332473, 382873, 418993, 440497, 551233, 584473, 607993, 727777, 737353, 838657, 920137, 922993, 983347, 995443, 1079107, 1186963, 1292593, 1469833, 1621537, 1669537, 1781803, 1858033, 1912513, 1913473

Offset: 1

Author

Klaus Brockhaus, Apr 25 2001

Keywords

• nonn

Links

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

Crossrefs

Cf. A001918, A001126, A019347.

Programs

Mathematica

Select[ Prime@Range@200000, PrimitiveRoot[#] == 20 &] (* Robert G. Wilson v, May 11 2001 *)

Extensions

More terms from Robert G. Wilson v, May 11 2001