%I #15 Jul 19 2015 00:58:39

%S 107227,151537,235747,332473,382873,418993,440497,551233,584473,

%T 607993,727777,737353,838657,920137,922993,983347,995443,1079107,

%U 1186963,1292593,1469833,1621537,1669537,1781803,1858033,1912513,1913473

%N Primes with 20 as smallest positive primitive root.

%H T. D. Noe, <a href="/A061332/b061332.txt">Table of n, a(n) for n=1..1000</a>

%t Select[ Prime@Range@200000, PrimitiveRoot[#] == 20 &] (* _Robert G. Wilson v_, May 11 2001 *)

%Y Cf. A001918, A001126, A019347.

%K nonn

%O 1,1

%A _Klaus Brockhaus_, Apr 25 2001

%E More terms from _Robert G. Wilson v_, May 11 2001