This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A054506 #14 Jul 02 2025 16:01:59
%S A054506 3,1,8,4,1,13,16,5,1,26,15,1,20,17,50,6,39,26,6,1,72,1,70,69,39,70,52,
%T A054506 1,1,72,1,41,87,81,82,101,94,27,108,56,116,84,181,1,43,1,46,208,1,74,
%U A054506 182,16,1,50,109,117,188,1,1,157,81,164,56,249,1,314,152,26,1,186,75
%N A054506 Log_b 3 where b is smallest primitive root (A001918) mod n-th prime.
%D A054506 Tom M. Apostol, Introduction to Analytic Number Theory, Springer-Verlag, 1976, Table 10.2, pp. 216-217.
%H A054506 Amiram Eldar, <a href="/A054506/b054506.txt">Table of n, a(n) for n = 3..10000</a>
%t A054506 a[n_] := Module[{p, b, lg = 1}, b = PrimitiveRoot[p = Prime[n]]; While[ PowerMod[b, lg, p] != 3 , lg++]; lg]; Array[a, 100, 3] (* _Jean-François Alcover_, Sep 03 2016 *)
%Y A054506 Cf. table in A054503.
%Y A054506 Cf. A001918, A054505, A054507, A054508, A054509, A054510, A054511, A054512, A054513.
%K A054506 nonn,easy
%O A054506 3,1
%A A054506 _N. J. A. Sloane_, Apr 09 2000
%E A054506 More terms from _James Sellers_, Apr 09 2000