login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A019376
Primes with primitive root 52.
1
5, 7, 11, 19, 31, 37, 41, 47, 59, 71, 83, 109, 137, 149, 151, 163, 167, 193, 197, 227, 241, 271, 281, 293, 307, 317, 353, 359, 383, 397, 401, 409, 431, 457, 461, 479, 487, 509, 557, 577, 587, 593, 619, 643, 683, 691, 709, 733, 743, 761, 769, 773, 811, 821, 827, 839, 853
OFFSET
1,1
MATHEMATICA
pr=52; Select[Prime[Range[200]], MultiplicativeOrder[pr, # ] == #-1 &]
CROSSREFS
Sequence in context: A045440 A023235 A118918 * A159080 A349821 A349820
KEYWORD
nonn
STATUS
approved