login
A105913
Primes for which -41 is a primitive root.
1
2, 13, 17, 23, 31, 53, 59, 83, 89, 97, 103, 107, 127, 131, 139, 149, 163, 181, 193, 229, 233, 251, 257, 281, 283, 293, 307, 313, 317, 359, 367, 419, 421, 431, 443, 457, 467, 509, 521, 557, 593, 599, 601, 607, 619, 641, 647, 653, 709, 739, 743, 757, 773, 787, 809, 859, 863
OFFSET
1,1
MATHEMATICA
pr=-41; Select[Prime[Range[200]], MultiplicativeOrder[pr, # ] == #-1 &]
CROSSREFS
Sequence in context: A152652 A142339 A348633 * A020480 A352572 A018459
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Apr 24 2005
STATUS
approved