A032545 Integer part of decimal 'base-6 looking' numbers divided by their actual base-6 values, rounded down.

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

Offset: 1

Author

Patrick De Geest, Apr 15 1998

Keywords

• nonn
• easy
• base

Links

• Charles R Greathouse IV, Table of n, a(n) for n = 1..10000

Crossrefs

Cf. A007092, A032546, A032547.

See also A032532 for explanation.

Programs

Mathematica

Array[IntegerPart[FromDigits[#2]/#1] & @@ {#, IntegerDigits[#, 6]} &, 105] (* Michael De Vlieger, Oct 06 2019 *)

PARI

for(n=1,1e3,v=eval(Vec(Str(n)));if(vecmax(v)<6, print1(n\sum(i=1,#v,v[i]*6^(#v-i))", "))) \\ Charles R Greathouse IV, Apr 08 2012

Formula

a(n) = floor(A007092(n)/n). - Sean A. Irvine, Jun 22 2020