|
%I #10 Sep 09 2020 02:06:57
%S 0,1,6,6,6,6,6,6,10,10,21,6,21,15,15,15,15,6,6,21,15,6,6,10,14,6,6,10,
%T 6,6,6,14,6,6,10,6,6,14,10,6,21,10,35,6,6,6,15,6,6,10,21,14,6,33,6,6,
%U 10,6,6,6,10,6,22,15,15,6,10,12,6,15,15,10,14,21,6,15,6,6,6,6,6,6,6,10,10,6
%N Smallest primitive root of numbers in sequence A103335.
%H Robert Israel, <a href="/A103337/b103337.txt">Table of n, a(n) for n = 1..10000</a>
%H Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/PrimitiveRoot.html">Primitive Root.</a>
%p # given list A103335 as at that sequence
%p [0,seq(numtheory:-primroot(A103335[i]),i=2..nops(A103335))]; # _Robert Israel_, Sep 08 2020
%Y Cf. A001918, A046144, A046145, A046146, A103309, A103310, A103335, A103336, A103338.
%K nonn
%O 1,3
%A _Harry J. Smith_, Jan 31 2005
%E Offset changed by _Robert Israel_, Sep 08 2020
|
