A071203 Integer part of n divided by its largest digit (decimal notation).

1, 1, 1, 1, 1, 1, 1, 1, 1, 10, 11, 6, 4, 3, 3, 2, 2, 2, 2, 10, 10, 11, 7, 6, 5, 4, 3, 3, 3, 10, 10, 10, 11, 8, 7, 6, 5, 4, 4, 10, 10, 10, 10, 11, 9, 7, 6, 6, 5, 10, 10, 10, 10, 10, 11, 9, 8, 7, 6, 10, 10, 10, 10, 10, 10, 11, 9, 8, 7, 10, 10, 10, 10, 10

Offset: 1

Author

Reinhard Zumkeller, May 16 2002

Keywords

• nonn
• base

Links

• Harvey P. Dale, Table of n, a(n) for n = 1..1000

Crossrefs

a(n) = floor(n/A054055(n)), A071204, A071206.

Programs

Mathematica

IntegerPart[#/Max[IntegerDigits[#]]]&/@Range[80] (* Harvey P. Dale, Jul 11 2014 *)