A019358 Primes with primitive root 32.

3, 5, 13, 19, 29, 37, 53, 59, 67, 83, 107, 139, 149, 163, 173, 179, 197, 227, 269, 293, 317, 347, 349, 373, 379, 389, 419, 443, 467, 509, 523, 547, 557, 563, 587, 613, 619, 653, 659, 677, 709, 757, 773, 787, 797, 827, 829, 853, 859, 877, 883, 907, 947, 1019, 1109, 1117

Offset: 1

Author

David W. Wilson

Keywords

• nonn
• easy

Links

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

Programs

Mathematica

Select[Prime[Range[200]], MultiplicativeOrder[32, # ] == # - 1 &]
Join[{3,5,13,19,29},Select[Prime[Range[10,200]],PrimitiveRoot[#,32]==32&]] (* Harvey P. Dale, Aug 21 2021 *)