login
A240095
Numbers with primitive root -14.
12
11, 17, 29, 31, 43, 47, 53, 73, 89, 97, 107, 109, 121, 149, 163, 167, 179, 199, 241, 257, 271, 277, 289, 311, 313, 317, 331, 347, 353, 367, 373, 383, 389, 421, 433, 443, 479, 499, 503, 521, 541, 557, 571, 593, 601, 607, 613, 647, 653, 683, 701, 709
OFFSET
1,1
LINKS
MATHEMATICA
pr = -14; Select[Range[2, 800], MultiplicativeOrder[pr, #] == EulerPhi[#] &]
CROSSREFS
Cf. numbers with positive primitive root r: A167791 (r=2), A167792 (r=3), A167793 (r=5), A167794 (r=6), A167795 (r=7), A167796 (r=8), A167797 (r=10), A240028 (r=11), A240030 (r=12), A240032 (r=13), A240094 (r=14).
Cf. numbers with negative primitive root r: A167798 (r=-2), A167799 (r=-3), A167800 (r=-4), A167801 (r=-5), A167802 (r=-6), A167803 (r=-7), A167804 (r=-8), A167805 (r=-9), A167806 (r=-10), A240029 (r=-11), A240031 (r=-12), A240093 (r=-13).
Sequence in context: A191061 A377177 A110055 * A105886 A225493 A051634
KEYWORD
nonn,easy
AUTHOR
Vincenzo Librandi, Apr 01 2014
STATUS
approved