login
A019412
Primes with primitive root 90.
1
11, 17, 19, 23, 29, 47, 59, 97, 101, 113, 131, 137, 139, 149, 167, 179, 181, 193, 223, 229, 233, 251, 257, 263, 269, 313, 331, 337, 349, 353, 367, 379, 383, 389, 421, 457, 461, 491, 499, 503, 509, 577, 593, 607, 617, 619, 647, 659, 673, 691, 701, 709, 739, 811, 829, 857
OFFSET
1,1
MATHEMATICA
pr=90; Select[Prime[Range[200]], MultiplicativeOrder[pr, # ] == #-1 &]
CROSSREFS
Sequence in context: A316100 A049593 A216664 * A178641 A226682 A111257
KEYWORD
nonn
STATUS
approved