login
A019377
Primes with primitive root 53.
1
2, 3, 5, 19, 23, 31, 41, 71, 73, 79, 83, 101, 103, 109, 127, 137, 139, 157, 167, 173, 179, 181, 191, 193, 233, 239, 251, 257, 263, 277, 337, 353, 359, 373, 379, 383, 389, 401, 419, 421, 443, 457, 463, 479, 499, 503, 509, 557, 563, 569, 571, 601, 613, 617, 631, 641, 677
OFFSET
1,1
MATHEMATICA
pr=53; Select[Prime[Range[200]], MultiplicativeOrder[pr, # ] == #-1 &]
CROSSREFS
Sequence in context: A090116 A038876 A038932 * A215320 A215357 A235639
KEYWORD
nonn
STATUS
approved