login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

A105879
Primes for which -7 is a primitive root.
2
2, 3, 5, 13, 17, 31, 41, 47, 59, 61, 83, 89, 97, 101, 103, 131, 139, 167, 173, 199, 227, 229, 241, 251, 257, 269, 271, 283, 293, 307, 349, 383, 397, 433, 461, 467, 479, 503, 509, 521, 523, 563, 577, 587, 593, 601, 619, 643, 647, 677, 691, 719, 727, 733, 761, 773, 787, 797
OFFSET
1,1
MATHEMATICA
pr=-7; Select[Prime[Range[200]], MultiplicativeOrder[pr, # ] == #-1 &]
CROSSREFS
Sequence in context: A231481 A284669 A154554 * A066111 A065820 A163268
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Apr 24 2005
STATUS
approved