login
A019378
Primes with primitive root 54.
1
7, 13, 17, 37, 41, 59, 61, 79, 83, 89, 103, 107, 113, 131, 137, 151, 179, 181, 199, 227, 233, 251, 257, 281, 347, 349, 353, 367, 373, 401, 419, 421, 443, 449, 463, 467, 487, 491, 521, 541, 563, 569, 587, 593, 607, 613, 617, 631, 641, 659, 661, 683, 709, 751, 757, 761
OFFSET
1,1
MATHEMATICA
pr=54; Select[Prime[Range[200]], MultiplicativeOrder[pr, # ] == #-1 &]
CROSSREFS
Sequence in context: A174877 A230433 A029477 * A250288 A214785 A005762
KEYWORD
nonn
STATUS
approved