login
A240029
Numbers with primitive root -11.
17
2, 7, 13, 14, 17, 26, 29, 34, 41, 49, 58, 73, 79, 82, 83, 98, 101, 107, 109, 127, 131, 139, 146, 149, 151, 158, 166, 167, 169, 173, 197, 202, 214, 218, 227, 233, 239, 254, 262, 263, 271, 277, 278, 281, 283, 289, 293, 298, 302, 307, 334, 338, 343, 346, 347
OFFSET
1,1
LINKS
MATHEMATICA
pr = -11; Select[Range[2, 400], 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).
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).
Sequence in context: A323740 A130710 A145300 * A340104 A216525 A232637
KEYWORD
nonn,easy
AUTHOR
Vincenzo Librandi, Apr 01 2014
STATUS
approved