login
A019395
Primes with primitive root 72.
1
5, 11, 13, 19, 29, 37, 43, 53, 59, 83, 101, 107, 109, 131, 139, 149, 157, 163, 173, 179, 197, 211, 227, 229, 251, 269, 277, 283, 293, 317, 347, 349, 373, 379, 389, 397, 419, 421, 443, 467, 491, 509, 541, 557, 563, 571, 587, 653, 659, 677, 683, 709, 733, 739, 773, 797
OFFSET
1,1
MATHEMATICA
pr=72; Select[Prime[Range[200]], MultiplicativeOrder[pr, # ] == #-1 &]
CROSSREFS
Sequence in context: A104216 A269819 A040144 * A045448 A157750 A359501
KEYWORD
nonn
STATUS
approved