|
Search: id:A061739
|
|
|
| A061739 |
|
Primes with 37 as smallest positive primitive root. |
|
+0 1
|
|
| 36721, 51361, 63361, 97441, 129529, 132169, 171889, 190537, 201769, 314161, 333791, 343081, 387721, 422231, 493919, 496609, 515761, 529489, 532009, 532561, 557041, 596569, 600601, 618719, 619921, 628319, 629281, 631991, 662281, 663127
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
MATHEMATICA
|
<< NumberTheory`NumberTheoryFunctions`; Prime[ Select[ Range[100000], PrimitiveRoot[ Prime[ # ] ] == 37 & ] ]
(* first load *) << NumberTheory`NumberTheoryFunctions` (* then *) Select[ Prime@Range@100000, PrimitiveRoot@# == 37 &] (from Robert G. Wilson v (rgwv(at)rgwv.com), May 11 2001)
|
|
CROSSREFS
|
A001918, A001126, A019362.
Sequence in context: A138556 A011771 A011770 this_sequence A051393 A057881 A112728
Adjacent sequences: A061736 A061737 A061738 this_sequence A061740 A061741 A061742
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Klaus Brockhaus (klaus-brockhaus(AT)t-online.de), May 06 2001
|
|
EXTENSIONS
|
More terms from Robert G. Wilson v (rgwv(AT)rgwv.com), May 11 2001
|
|
|
Search completed in 0.002 seconds
|