login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

A019346
Primes with primitive root 19.
2
2, 7, 11, 13, 23, 29, 37, 41, 43, 47, 53, 83, 89, 113, 139, 163, 173, 191, 193, 239, 251, 257, 263, 269, 281, 293, 311, 317, 337, 347, 359, 367, 401, 419, 433, 443, 449, 463, 467, 479, 491, 499, 503, 509, 521, 569, 571, 587, 601, 619, 631, 641, 643, 647, 673, 677, 719
OFFSET
1,1
MATHEMATICA
Select[Prime[Range[200]], MultiplicativeOrder[19, #] == # - 1 &]
CROSSREFS
Sequence in context: A235475 A146315 A038892 * A045369 A157975 A339862
KEYWORD
nonn,easy
STATUS
approved