login
A105892
Primes for which -20 is a primitive root.
1
11, 13, 17, 31, 37, 53, 59, 73, 79, 113, 131, 137, 139, 157, 173, 179, 191, 199, 211, 233, 239, 257, 271, 277, 293, 313, 317, 331, 337, 353, 359, 379, 397, 419, 431, 433, 439, 479, 499, 557, 593, 599, 613, 631, 653, 659, 673, 677, 719, 751, 773, 797, 811, 839, 853, 857
OFFSET
1,1
MATHEMATICA
pr=-20; Select[Prime[Range[200]], MultiplicativeOrder[pr, # ] == #-1 &]
CROSSREFS
Sequence in context: A052031 A166009 A240107 * A111337 A359136 A359137
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Apr 24 2005
STATUS
approved