A105881 Primes for which -9 is a primitive root.

2, 7, 11, 19, 23, 31, 43, 47, 59, 71, 79, 83, 107, 127, 131, 139, 163, 167, 179, 191, 199, 211, 223, 227, 239, 251, 263, 283, 311, 331, 347, 359, 379, 383, 419, 443, 463, 467, 479, 487, 503, 563, 571, 587, 599, 607, 631, 647, 659, 691, 719, 739, 743, 751, 811, 823, 827

Offset: 1

Author

N. J. A. Sloane, Apr 24 2005

Keywords

• nonn

Links

• Vincenzo Librandi, Table of n, a(n) for n = 1..1000
• Index entries for primes by primitive root

Programs

Mathematica

pr=-9; Select[Prime[Range[200]], MultiplicativeOrder[pr, # ] == #-1 &]