A036230 a(n+1) = a(n) + sum of digits of a(n) starting with 110.
110, 112, 116, 124, 131, 136, 146, 157, 170, 178, 194, 208, 218, 229, 242, 250, 257, 271, 281, 292, 305, 313, 320, 325, 335, 346, 359, 376, 392, 406, 416, 427, 440, 448, 464, 478, 497, 517, 530, 538, 554, 568, 587, 607, 620, 628, 644, 658, 677, 697, 719
Offset: 1
Programs
-
Mathematica
NestList[#+Total[IntegerDigits[#]]&,110,50] (* Harvey P. Dale, Oct 01 2017 *)
Comments