login
A098751
a(n+1) = a(n) + 10's complement of each of the digits of a(n); a(0) = 0.
1
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,2
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
MATHEMATICA
NestList[Total[10-IntegerDigits[#]]+#&, 0, 60] (* Harvey P. Dale, Jan 02 2014 *)
CROSSREFS
Sequence in context: A343385 A103423 A102542 * A143190 A009771 A068197
KEYWORD
base,easy,nonn
AUTHOR
Eric Angelini, Oct 01 2004
EXTENSIONS
More terms from Sam Alexander, Jan 06 2005
STATUS
approved