A019356 Primes with primitive root 30.

11, 23, 41, 43, 47, 59, 61, 79, 89, 109, 131, 151, 167, 173, 179, 193, 197, 199, 251, 263, 281, 293, 307, 317, 349, 383, 419, 421, 433, 439, 449, 457, 491, 503, 521, 523, 541, 557, 569, 577, 641, 647, 653, 659, 673, 677, 743, 751, 761, 773, 787, 797, 809, 829, 863, 881

Offset

1,1

Links

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

Index entries for primes by primitive root

Mathematica

Select[Prime[Range[200]], MultiplicativeOrder[30, #] == # - 1 &]
Join[{11, 23}, Select[Prime[Range[200]], PrimitiveRoot[#, 30]==30&]] (* Harvey P. Dale, Sep 23 2018 *)

Crossrefs

Sequence in context: A339080 A077345 A130282 * A046440 A232116 A119890

Adjacent sequences: A019353 A019354 A019355 * A019357 A019358 A019359

Keyword

nonn,easy

Author

David W. Wilson

Status

approved