|
|
A114681
|
|
Primes with 66 as smallest positive primitive root.
|
|
1
|
|
|
27955201, 30822481, 33776401, 80724841, 111549481, 115129561, 164062081, 260568421, 288955801, 304100161, 348601681, 348990769, 411542401, 446320729, 464872591, 470475121, 473949121, 514613581, 541760881, 544552681, 552269761, 637927201, 652107121, 669037321
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
(* first load *) << NumberTheory`NumberTheoryFunctions` (* then *) t={}; Do[ If[ PrimitiveRoot[ Prime@n] == 66, AppendTo[t, n]; Print@Prime@n], {n, 29000000}]; Prime@t
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|