A114676 Primes with 60 as smallest positive primitive root.

697591, 1565939311, 2201381953, 5761774591, 6206852191, 6458249953, 8920186111, 10354295953, 10852325191, 11460087211, 12045861031, 14021799793, 16585400833, 16946270251, 18414492097, 18500061271, 18677081011, 18993773839, 19016413417, 19211878841, 19811337631

Offset

1,1

Links

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

Mathematica

Select[Prime[Range[5183*10^5]], PrimitiveRoot[#, 2]==60&] (* The program generates the first 10 terms of the sequence. *) (* Harvey P. Dale, Feb 26 2025 *)

Prog

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

Crossrefs

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

Sequence in context: A345604 A346358 A206518 * A319917 A205608 A205439

Adjacent sequences: A114673 A114674 A114675 * A114677 A114678 A114679

Keyword

nonn,hard

Author

Robert G. Wilson v, Dec 21 2005

Extensions

a(4)-a(5) from Tomás Oliveira e Silva (tos(AT)det.ua.pt), Jan 05 2006

a(6)-a(10) from Ray Chandler, Jan 13 2006

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

Status

approved