A019342 - OEIS

A019342

Primes with primitive root 14.

3, 17, 19, 23, 29, 53, 59, 73, 83, 89, 97, 109, 127, 131, 149, 151, 227, 239, 241, 251, 257, 263, 277, 283, 307, 313, 317, 353, 359, 373, 389, 419, 421, 431, 433, 467, 487, 521, 541, 557, 563, 587, 593, 599, 601, 613, 631, 643, 653, 701, 709, 743, 751, 757, 761, 769, 787

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,1

LINKS

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

Index entries for primes by primitive root

MATHEMATICA

pr=14; Select[Prime[Range[200]], MultiplicativeOrder[pr, # ] == #-1 &]

Join[{3}, Select[Prime[Range[200]], PrimitiveRoot[#, 14]==14&]] (* Harvey P. Dale, May 13 2019 *)

CROSSREFS

Sequence in context: A246143 A101144 A038886 * A340408 A339544 A029473

Adjacent sequences: A019339 A019340 A019341 * A019343 A019344 A019345

KEYWORD

nonn

AUTHOR

David W. Wilson

STATUS

approved