A114680 Primes with 65 as smallest positive primitive root.

11089681, 12780601, 12937417, 13359361, 14880721, 21843361, 26686081, 36474001, 43208857, 61214471, 62130097, 64723849, 65049889, 68478481, 73237081, 73610881, 74207281, 78489049, 88689001, 95037073, 99589561, 99705769, 100127281, 102215233, 103073041

Offset

1,1

Links

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

Mathematica

(* first load *) << NumberTheory`NumberTheoryFunctions` (* then *) t={}; Do[ If[ PrimitiveRoot[ Prime@n] == 65, AppendTo[t, n]; Print@Prime@n], {n, 5890000}]; Prime@t
Select[Prime[Range[574*10^4]], PrimitiveRoot[#, 1]==65&] (* Harvey P. Dale, Jul 30 2019 *)

Crossrefs

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

Sequence in context: A224639 A298704 A308079 * A329224 A383919 A274834

Adjacent sequences: A114677 A114678 A114679 * A114681 A114682 A114683

Keyword

nonn

Author

Robert G. Wilson v, Dec 21 2005

Extensions

a(22) and beyond from Robert Price, Nov 20 2023

a(25) corrected by David Radcliffe, Aug 04 2025

Status

approved