|
|
A114662
|
|
Primes with 45 as smallest positive primitive root.
|
|
2
|
|
|
95525767, 119154337, 187156663, 241624153, 307396447, 315255697, 350645233, 359030233, 397620007, 398947033, 414684817, 443874817, 512952007, 536331097, 556355647, 559634377, 588250447, 635613463, 657965743, 747854017, 753117457, 753369457, 800256913
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
(* first load *) << NumberTheory`NumberTheoryFunctions` (* then *) t = {}; Do[ If[ PrimitiveRoot[Prime@n] == 45, AppendTo[t, n]; Print@n], {n, 38600000}]; Prime@t
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|