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
KEYWORD
base,nonn
AUTHOR
Kevin Ryde, Nov 28 2020
STATUS
approved