A160941 a(n)= n - digital sum(n-1)

1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, 46, 46, 46, 46, 46, 46, 46, 46, 46, 46, 55, 55, 55, 55, 55, 55, 55, 55, 55, 55, 64, 64, 64

Offset

1,11

Comments

a(8)=8-ds(7)=8-7=1; a(15)=15-ds(14)=15-5=10; a(26)=26-ds(25)=26-7=19

Links

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

Mathematica

Table[n-Total[IntegerDigits[n-1]], {n, 80}]  (* Harvey P. Dale, Apr 20 2011 *)

Crossrefs

Sequence in context: A269352 A010692 A109751 * A070565 A376257 A169932

Adjacent sequences: A160938 A160939 A160940 * A160942 A160943 A160944

Keyword

nonn,base

Author

Claudio Meller, May 30 2009

Status

approved