A019344 Primes with primitive root 17.

2, 3, 5, 7, 11, 23, 31, 37, 41, 61, 97, 107, 113, 131, 139, 167, 173, 193, 197, 211, 227, 233, 269, 277, 283, 311, 313, 317, 347, 367, 379, 401, 419, 431, 439, 449, 479, 487, 499, 503, 521, 547, 571, 607, 617, 641, 643, 653, 673, 677, 683, 691, 709, 719, 743, 751, 787

Offset

1,1

Links

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

Index entries for primes by primitive root

Mathematica

pr=17; Select[Prime[Range[200]], MultiplicativeOrder[pr, # ] == #-1 &]
Join[{2, 3, 5, 7, 11}, Select[Prime[Range[200]], PrimitiveRoot[#, 17]==17&]] (* Harvey P. Dale, Jul 03 2019 *)

Crossrefs

Sequence in context: A118723 A118721 A094318 * A229291 A057459 A068853

Adjacent sequences: A019341 A019342 A019343 * A019345 A019346 A019347

Keyword

nonn

Author

David W. Wilson

Status

approved