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, 20572400551

Offset

1,1

Links

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

Mathematica

t = {}; Do[ If[ PrimitiveRoot[ Prime@n] == 48, AppendTo[t, n]; Print@Prime@n], {n, 235000000}]; Prime@t

Prog

(PARI) is(k) = isprime(k) && znprimroot(k)==48; \\ Jinyuan Wang, Apr 09 2025

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

nonn,hard

Author

Robert G. Wilson v, Dec 21 2005

Extensions

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

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

Status

approved