|
%I #14 Mar 29 2020 03:09:17
%S 0,106,1,14,138,107,142,120,2,46,189,15,172,50,139,28,123,108,55,152,
%T 143,97,118,121,78,80,3,156,70,47,164,134,190,31,82,16,11,161,173,60,
%U 167,51,88,5,140,26,76,29,86,184,124,186,158,109,129,64,56,176,195
%N Log base 3 (n) mod 199.
%D I. M. Vinogradov, Elements of Number Theory, p. 220ff.
%H Georg Fischer, <a href="/A036201/b036201.txt">Table of n, a(n) for n = 1..198</a>
%p with (numtheory): seq(mlog(n, 3, 199), n=1..198); # _Georg Fischer_, Mar 10 2020
%t a[1]=0; a[n_]:=MultiplicativeOrder[3, 199, {n}]; Array[a, 198] (* _Vincenzo Librandi_, Mar 29 2020 *)
%K nonn,fini,full
%O 1,2
%A _N. J. A. Sloane_
|
