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 A054512 #14 Jul 02 2025 16:01:59
%S A054512 6,8,2,8,10,10,2,16,30,2,40,34,42,12,12,52,12,2,62,2,44,38,78,34,104,
%T A054512 2,2,14,2,82,26,12,8,40,22,54,38,112,42,168,166,2,86,2,92,188,2,148,
%U A054512 124,32,2,100,218,234,100,2,2,22,162,18,112,182,2,292,304,52,2,14,150,104
%N A054512 Log_b 9 where b is smallest primitive root (A001918) mod n-th prime.
%D A054512 Tom M. Apostol, Introduction to Analytic Number Theory, Springer-Verlag, 1976, Table 10.2, pp. 216-217.
%H A054512 Amiram Eldar, <a href="/A054512/b054512.txt">Table of n, a(n) for n = 5..10000</a>
%t A054512 a[n_] := Module[{p, b, lg = 1}, b = PrimitiveRoot[p = Prime[n]]; While[ PowerMod[b, lg, p] != 9, lg++]; lg]; Array[a, 100, 5] (* _Jean-François Alcover_, Sep 03 2016 *)
%Y A054512 Cf. table in A054503.
%Y A054512 Cf. A001918, A054505, A054506, A054507, A054508, A054509, A054510, A054511, A054513.
%K A054512 nonn,easy
%O A054512 5,1
%A A054512 _N. J. A. Sloane_, Apr 09 2000
%E A054512 More terms from _James Sellers_, Apr 09 2000