login
A105885
Primes for which -13 is a primitive root.
5
2, 3, 5, 23, 37, 41, 43, 73, 79, 89, 97, 107, 109, 127, 131, 137, 139, 149, 179, 191, 197, 199, 241, 251, 263, 281, 283, 293, 317, 347, 349, 353, 367, 397, 401, 439, 449, 457, 467, 491, 503, 509, 523, 541, 557, 563, 571, 577, 593, 599, 607, 613, 617, 647, 659, 719, 727
OFFSET
1,1
COMMENTS
Primes p such that Legendre(-13,p) = -1. - N. J. A. Sloane, Dec 26 2017
MAPLE
Load the Maple program HH given in A296920. Then run HH(-13, 200); This produces A296926, A296927, A296928, A105885. - N. J. A. Sloane, Dec 26 2017
MATHEMATICA
pr=-13; Select[Prime[Range[200]], MultiplicativeOrder[pr, # ] == #-1 &]
CROSSREFS
Sequence in context: A034470 A237812 A138170 * A228830 A339062 A215313
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Apr 24 2005
STATUS
approved