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,2

Links

Kevin Ryde, Table of n, a(n) for n = 1..10000

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).

In other bases: A122586, A122587, A339255, A000030, A099563, A276153.

Sequence in context: A346690 A117724 A255826 * A277544 A190595 A338863

Adjacent sequences: A339253 A339254 A339255 * A339257 A339258 A339259

Keyword

base,nonn

Author

Kevin Ryde, Nov 28 2020

Status

approved