A019383 Primes with primitive root 59.

2, 3, 7, 13, 19, 37, 61, 71, 73, 79, 89, 97, 101, 107, 109, 113, 149, 167, 173, 229, 233, 239, 251, 263, 269, 271, 307, 311, 313, 331, 349, 359, 383, 397, 401, 439, 457, 479, 487, 491, 509, 541, 569, 599, 607, 619, 631, 643, 647, 701, 727, 743, 769, 773, 787, 797, 809

Offset

1,1

Links

Vincenzo Librandi, Table of n, a(n) for n = 1..1000

Index entries for primes by primitive root

Mathematica

pr=59; Select[Prime[Range[200]], MultiplicativeOrder[pr, # ] == #-1 &]
Join[{2, 3, 7, 13, 19, 37}, Select[Prime[Range[18, 200]], PrimitiveRoot[#, 59]==59&]] (* Harvey P. Dale, Jul 14 2024 *)

Crossrefs

Sequence in context: A172238 A319496 A038940 * A249749 A171817 A156300

Adjacent sequences: A019380 A019381 A019382 * A019384 A019385 A019386

Keyword

nonn

Author

David W. Wilson

Status

approved