[go: up one dir, main page]

login
A019411
Primes with primitive root 89.
1
2, 3, 7, 13, 19, 23, 29, 37, 41, 43, 59, 83, 101, 113, 137, 149, 151, 163, 191, 197, 239, 293, 313, 337, 349, 353, 359, 379, 383, 389, 397, 431, 439, 457, 491, 499, 503, 557, 563, 569, 571, 577, 593, 599, 647, 653, 677, 683, 709, 719, 727, 743, 773, 787, 827, 839, 853
OFFSET
1,1
MATHEMATICA
pr=89; Select[Prime[Range[200]], MultiplicativeOrder[pr, # ] == #-1 &]
CROSSREFS
Sequence in context: A329415 A329416 A155479 * A105792 A130903 A068828
KEYWORD
nonn
STATUS
approved