login
A019389
Primes with primitive root 66.
3
7, 23, 29, 47, 79, 83, 89, 101, 107, 113, 131, 137, 149, 157, 163, 173, 181, 193, 197, 227, 229, 241, 257, 271, 293, 311, 331, 347, 353, 379, 383, 397, 401, 421, 439, 449, 457, 461, 499, 521, 557, 563, 599, 601, 607, 617, 619, 641, 643, 647, 659, 673, 701, 719, 769, 821
OFFSET
1,1
MATHEMATICA
pr=66; Select[Prime[Range[200]], MultiplicativeOrder[pr, # ] == #-1 &]
CROSSREFS
Sequence in context: A070330 A095314 A038948 * A056723 A080802 A078515
KEYWORD
nonn
STATUS
approved