A114683 Primes with 68 as smallest positive primitive root.

3733801, 35507761, 35902441, 43734601, 52704961, 57882691, 60170881, 66434341, 88016041, 102019681, 111554041, 119630281, 145836601, 153955201, 167521201, 170963521, 183145561, 206125921, 210210841, 210912601, 217455001, 245357641

Offset

1,1

Links

Table of n, a(n) for n=1..22.

Mathematica

(* first load *) << NumberTheory`NumberTheoryFunctions` (* then *) t={}; Do[ If[ PrimitiveRoot[ Prime@n] == 68, AppendTo[t, n]; Print@Prime@n], {n, 13500000}]; Prime@t

Crossrefs

Cf. A001122-A001126, A061323-A061335, A061730-A061741, A114657-A114686.

Sequence in context: A254496 A254489 A253861 * A184647 A233753 A333744

Adjacent sequences: A114680 A114681 A114682 * A114684 A114685 A114686

Keyword

nonn

Author

Robert G. Wilson v, Dec 21 2005

Status

approved