%I #9 Mar 21 2020 03:21:29
%S 0,2,16,4,1,18,19,6,10,3,9,20,14,21,17,8,7,12,15,5,13,11
%N Log base 5 (n) mod 23.
%D I. M. Vinogradov, Elements of Number Theory, p. 220ff.
%t a[1]=0; a[n_]:=MultiplicativeOrder[5, 23, {n}]; Array[a, 22] (* _Vincenzo Librandi_, Mar 21 2020 *)
%K nonn,fini,full
%O 1,2
%A _N. J. A. Sloane_.
|