%I #18 Sep 10 2021 13:48:06
%S 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,
%T 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,
%U 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
%N a(n) = 10 - m, where m = maximal digit of n.
%F a(n) = 10 - A054055(n).
%e a(107) = 10 - max{1,0,7} = 10 - 7 = 3.
%t Table[10 - Max[ IntegerDigits[n]], {n, 1, 105}] (* _Robert G. Wilson v_ *)
%o (Python)
%o def a(n): return (10 - int(max(str(n))))
%o print([a(n) for n in range(1, 106)]) # _Michael S. Branicky_, Sep 08 2021
%Y Cf. A054055.
%K nonn,base,easy
%O 1,1
%A _N. J. A. Sloane_, Oct 17 2003
%E More terms from _Ray Chandler_, Oct 17 2003