login
A019410
Primes with primitive root 88.
1
5, 17, 23, 41, 47, 53, 73, 83, 103, 107, 131, 139, 157, 191, 223, 227, 233, 269, 283, 307, 311, 317, 347, 367, 383, 389, 421, 463, 487, 491, 509, 547, 563, 569, 571, 593, 599, 601, 647, 653, 659, 661, 673, 709, 719, 739, 751, 757, 761, 769, 773, 787, 797, 809, 811, 839
OFFSET
1,1
MATHEMATICA
pr=88; Select[Prime[Range[200]], MultiplicativeOrder[pr, # ] == #-1 &]
CROSSREFS
Sequence in context: A044438 A101414 A105884 * A133423 A154632 A236119
KEYWORD
nonn
STATUS
approved