A030076 a(n) = 10 - m, where m = maximal digit of n.

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

Offset

1,1

Links

Table of n, a(n) for n=1..105.

Formula

a(n) = 10 - A054055(n).

Example

a(107) = 10 - max{1,0,7} = 10 - 7 = 3.

Mathematica

Table[10 - Max[ IntegerDigits[n]], {n, 1, 105}] (* Robert G. Wilson v *)

Prog

(Python)
def a(n): return (10 - int(max(str(n))))
print([a(n) for n in range(1, 106)]) # Michael S. Branicky, Sep 08 2021

Crossrefs

Cf. A054055.

Sequence in context: A112454 A304621 A138531 * A269667 A171816 A083824

Adjacent sequences: A030073 A030074 A030075 * A030077 A030078 A030079

Keyword

nonn,base,easy

Author

N. J. A. Sloane, Oct 17 2003

Extensions

More terms from Ray Chandler, Oct 17 2003

Status

approved