%I #15 Jul 22 2022 16:42:31
%S 0,190,182,140,138,132,1,90,124,88,25,82,47,191,80,40,111,74,85,38,
%T 183,215,57,32,36,237,66,141,154,30,151,230,207,61,139,24,73,35,229,
%U 228,6,133,219,165,22,7,114,222,2,226,53,187,134,16,163,91,27,104,118
%N Log base 7 (n) mod 241.
%D I. M. Vinogradov, Elements of Number Theory, p. 220ff.
%H Georg Fischer, <a href="/A036208/b036208.txt">Table of n, a(n) for n = 1..240</a>
%p with (numtheory): seq(mlog(n, 7, 241), n=1..240); # _Georg Fischer_, Mar 10 2020
%t a[1]=0; a[n_]:=MultiplicativeOrder[7, 241, {n}]; Array[a, 240] (* _Vincenzo Librandi_, Mar 27 2020 *)
%K nonn,fini,full
%O 1,2
%A _N. J. A. Sloane_