login
A019375
Primes with primitive root 51.
1
2, 11, 19, 23, 53, 61, 67, 89, 101, 103, 107, 109, 137, 149, 151, 167, 193, 223, 227, 241, 257, 271, 281, 293, 337, 347, 353, 389, 397, 419, 431, 461, 479, 503, 509, 541, 557, 569, 593, 631, 673, 683, 701, 709, 719, 727, 739, 743, 761, 773, 797, 839, 853, 859, 877, 883
OFFSET
1,1
MATHEMATICA
pr=51; Select[Prime[Range[200]], MultiplicativeOrder[pr, # ] == #-1 &]
CROSSREFS
Sequence in context: A161504 A079062 A038930 * A078784 A117196 A304811
KEYWORD
nonn
STATUS
approved