A114665 Primes with 48 as smallest positive primitive root.

823766851, 1203424471, 1647646771, 2539428211, 4100784871, 4492676371, 5183970931, 6326736151, 6330402751, 8251729531, 8735517211, 10570534171, 11212271071

Offset

1,1

Links

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

Mathematica

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

Crossrefs

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

Sequence in context: A017540 A132216 A091340 * A229800 A182239 A204406

Adjacent sequences: A114662 A114663 A114664 * A114666 A114667 A114668

Keyword

hard,more,nonn

Author

Robert G. Wilson v, Dec 21 2005

Extensions

a(7)-a(13) from Ray Chandler, Jan 13 2006

Status

approved