%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_