A036183 - OEIS

%I #12 Mar 11 2020 08:27:26

%S 0,1,70,2,47,71,43,3,34,48,22,72,14,44,11,4,29,35,78,49,7,23,62,73,94,

%T 15,104,45,32,12,27,5,92,30,90,36,38,79,84,50,40,8,59,24,81,63,66,74,

%U 86,95,99,16,52,105,69,46,42,33,21,13,10,28,77,6,61,93

%N Log base 2 (n) mod 107.

%D I. M. Vinogradov, Elements of Number Theory, p. 220ff.

%H Georg Fischer, <a href="/A036183/b036183.txt">Table of n, a(n) for n = 1..106</a>

%p with (numtheory): seq(mlog(n, 2, 107), n=1..106); # _Georg Fischer_, Mar 09 2020

%t a[1]=0; a[n_]:=MultiplicativeOrder[2, 107, {n}]; Array[a, 106] (* _Vincenzo Librandi_, Mar 11 2020 *)

%K nonn,fini,full

%O 1,3

%A _N. J. A. Sloane_.