login
A339256
Leading digit of n in base 6.
3
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,2
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).
MATHEMATICA
Table[IntegerDigits[n, 6][[1]], {n, 90}] (* Harvey P. Dale, Jul 19 2023 *)
PROG
(PARI) a(n) = n\6^logint(n, 6);
CROSSREFS
Cf. A007092 (base 6), A109804 (partial sums).
Sequence in context: A346690 A117724 A255826 * A277544 A190595 A338863
KEYWORD
base,nonn
AUTHOR
Kevin Ryde, Nov 28 2020
STATUS
approved