|
|
A114684
|
|
Primes with 69 as smallest positive primitive root.
|
|
1
|
|
|
110881, 3236689, 3451009, 7318921, 8180041, 15124201, 20552449, 20753329, 22078681, 22772689, 23048089, 25454521, 32367721, 33937201, 35428511, 37842841, 39070249, 42598609, 47627711, 52920169, 63360361, 69656161, 73323721, 77630281, 78504721
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
(* first load *) << NumberTheory`NumberTheoryFunctions` (* then *) t={}; Do[ If[ PrimitiveRoot[ Prime@n] == 69, AppendTo[t, n]; Print@Prime@n], {n, 4310000}]; Prime@t
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|