A114665 Primes with 48 as smallest positive primitive root.

823766851, 1203424471, 1647646771, 2539428211, 4100784871, 4492676371, 5183970931, 6326736151, 6330402751, 8251729531, 8735517211, 10570534171, 11212271071, 12478723111, 13609280431, 16631896051, 18781331911, 18884910871, 20211833071, 20568043471

Offset

1,1

Links

Robert Price, Table of n, a(n) for n = 1..92

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

a(14)-a(20) from Robert Price, Nov 25 2023

Status

approved