A061735 - OEIS

%I #15 Sep 23 2013 13:46:03

%S 5881,23209,31391,39841,43801,53089,53881,61151,65831,88079,92569,

%T 99961,101089,102001,111409,135719,136751,141961,150721,169991,175081,

%U 196081,207481,216841,224401,250799,256369,271489,275521,276721,285757

%N Primes with 31 as smallest positive primitive root.

%H Vincenzo Librandi, <a href="/A061735/b061735.txt">Table of n, a(n) for n = 1..5000</a>

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

%Y Cf. A001918, A001126, A019357.

%K nonn

%O 1,1

%A _Klaus Brockhaus_, May 06 2001