A105914 Primes for which -42 is a primitive root.
5, 11, 19, 37, 47, 73, 79, 101, 107, 109, 127, 137, 151, 167, 173, 179, 233, 241, 269, 281, 293, 307, 311, 347, 373, 383, 401, 409, 443, 449, 461, 463, 479, 487, 503, 509, 569, 601, 613, 617, 631, 643, 647, 659, 677, 683, 719, 757, 769, 773, 787, 797, 809, 811, 827, 839
Offset: 1
Keywords
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..1000
- Index entries for primes by primitive root
Programs
-
Mathematica
pr=-42; Select[Prime[Range[200]], MultiplicativeOrder[pr, # ] == #-1 &]