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

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 A274834 A094326

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

Status

approved