login

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

A105878
Primes for which -6 is a primitive root.
2
13, 17, 19, 23, 41, 47, 61, 67, 71, 89, 109, 113, 137, 157, 167, 211, 229, 233, 257, 263, 277, 283, 331, 359, 373, 383, 397, 401, 449, 479, 503, 521, 523, 547, 569, 593, 599, 613, 619, 641, 647, 661, 691, 709, 719, 733, 739, 743, 757, 761, 787, 809, 811, 829, 839, 853
OFFSET
1,1
MATHEMATICA
pr=-6; Select[Prime[Range[200]], MultiplicativeOrder[pr, # ] == #-1 &]
PROG
(PARI) is(n)=isprime(n) && n>7 && znorder(Mod(-6, n))==n-1 \\ Charles R Greathouse IV, Feb 23 2017
CROSSREFS
Sequence in context: A268593 A175873 A167802 * A054476 A319504 A339912
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Apr 24 2005
STATUS
approved