A385229 Odd multiplicative orders of -3 modulo primes.
1, 3, 9, 15, 9, 21, 5, 11, 39, 17, 63, 69, 25, 39, 81, 99, 105, 111, 15, 141, 17, 165, 87, 61, 93, 189, 99, 73, 231, 243, 83, 29, 7, 285, 303, 51, 103, 315, 107, 11, 345, 121, 369, 375, 131, 405, 411, 71, 429, 219, 63, 453, 153, 117, 161, 165, 83, 17, 519, 105, 531, 267, 543, 561, 117
Offset: 1
Links
- Jianing Song, Table of n, a(n) for n = 1..10000
Crossrefs
Programs
-
Mathematica
Select[Map[MultiplicativeOrder[-3, #] &, Prime[Range[200]]], OddQ] (* Paolo Xausa, Jun 30 2025 *)
-
PARI
forprime(p=2, 1e4, if(p!=3, z=znorder(Mod(-3, p)); if(z%2, print1(z, ", "))))
Comments