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 A339256 #15 Dec 22 2024 14:28:43
%S A339256 1,2,3,4,5,1,1,1,1,1,1,2,2,2,2,2,2,3,3,3,3,3,3,4,4,4,4,4,4,5,5,5,5,5,
%T A339256 5,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
%U A339256 1,1,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2
%N A339256 Leading digit of n in base 6.
%H A339256 Kevin Ryde, <a href="/A339256/b339256.txt">Table of n, a(n) for n = 1..10000</a>
%F A339256 a(n) = floor(n / 6^floor(log_6(n))).
%F A339256 G.f.: (x + Sum_{k>=0} Sum_{d=2..5} (x^(d*6^k)-x^(6^(k+1))) )/(1-x).
%t A339256 Table[IntegerDigits[n,6][[1]],{n,90}] (* _Harvey P. Dale_, Jul 19 2023 *)
%o A339256 (PARI) a(n) = n\6^logint(n,6);
%Y A339256 Cf. A007092 (base 6), A109804 (partial sums).
%Y A339256 In other bases: A122586, A122587, A339255, A000030, A099563, A276153.
%K A339256 base,nonn
%O A339256 1,2
%A A339256 _Kevin Ryde_, Nov 28 2020