A339256 Leading digit of n in base 6.
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, 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, 1, 1, 1, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2
Offset: 1
Links
- Kevin Ryde, Table of n, a(n) for n = 1..10000
Crossrefs
Programs
-
Mathematica
Table[IntegerDigits[n,6][[1]],{n,90}] (* Harvey P. Dale, Jul 19 2023 *)
-
PARI
a(n) = n\6^logint(n,6);
Formula
a(n) = floor(n / 6^floor(log_6(n))).
G.f.: (x + Sum_{k>=0} Sum_{d=2..5} (x^(d*6^k)-x^(6^(k+1))) )/(1-x).