|
%I #10 Jul 14 2015 00:17:04
%S 0,1,2,3,4,5,6,7,8,9,19,299,3999999999999999999999999999999999
%N Smallest n such that digit sum of n > previous term.
%C a(14) has 444444444444444444444444444444445 digits and is too large to include. - _Arkadiusz Wesolowski_, Feb 17 2011
%e 8 is followed by 9 because 9 is the lowest number with a digit sum > 8.
%e 9 is followed by 19 because 19 is the lowest number with a digit sum (1 + 9 = 10) > 9.
%t f[s_List] := Block[{k = prev = s[[ -1]]}, While[ prev >= Plus @@ IntegerDigits@ k, k++ ]; Append[s, k]]; Nest[ f, {0}, 11] (* _Robert G. Wilson v_, Aug 15 2010 *)
%Y Cf. A006050. - _Robert G. Wilson v_, Aug 15 2010
%K more,nonn,base
%O 1,3
%A _Dominick Cancilla_, Aug 09 2010
%E a(13) from _Robert G. Wilson v_, Aug 15 2010
|
