|
%I #14 Mar 24 2020 19:45:23
%S 0,1,181,2,89,182,146,3,166,90,29,183,25,147,74,4,159,167,154,91,131,
%T 30,120,184,178,26,151,148,36,75,141,5,14,160,39,168,192,155,10,92,
%U 110,132,78,31,59,121,66,185,96,179,144,27,72,152,118,149,139,37,8
%N Log base 2 (n) mod 197.
%D I. M. Vinogradov, Elements of Number Theory, p. 220ff.
%H Georg Fischer, <a href="/A036200/b036200.txt">Table of n, a(n) for n = 1..196</a>
%p with (numtheory): seq(mlog(n, 2, 197), n=1..196); # _Georg Fischer_, Mar 10 2020
%t a[1]=0; a[n_]:=MultiplicativeOrder[2, 197, {n}]; Array[a, 196] (* _Vincenzo Librandi_, Mar 23 2020 *)
%K nonn,fini,full
%O 1,3
%A _N. J. A. Sloane_
|
