A098751 a(n+1) = a(n) + 10's complement of each of the digits of a(n); a(0) = 0.

0, 10, 29, 38, 47, 56, 65, 74, 83, 92, 101, 129, 147, 165, 183, 201, 228, 246, 264, 282, 300, 327, 345, 363, 381, 399, 408, 426, 444, 462, 480, 498, 507, 525, 543, 561, 579, 588, 597, 606, 624, 642, 660, 678, 687, 696, 705, 723, 741, 759, 768, 777, 786, 795

Offset: 0

Author

Eric Angelini, Oct 01 2004

Keywords

• base
• easy
• nonn

Comments

0 -> 10 because 0 + (10 - 0) = 10; 10 -> 29 because 10 + [(10 - 1) + (10 - 0)] = 29; 29 -> 38 because 19 + [(10 - 1) + (10 - 9)] = 38; ...

Links

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

Crossrefs

Cf. A004207, A098750.

Programs

Mathematica

NestList[Total[10-IntegerDigits[#]]+#&,0,60] (* Harvey P. Dale, Jan 02 2014 *)

Extensions

More terms from Sam Alexander, Jan 06 2005