A152231 Similar to A072921 but starting with 2.
2, 4, 10, 17, 32, 52, 79, 122, 170, 226, 292, 371, 461, 562, 676, 809, 959, 1132, 1312, 1499, 1709, 1936, 2182, 2441, 2711, 2992, 3295, 3617, 3956, 4318, 4696, 5099, 5525, 5968, 6439, 6932, 7445, 7978, 8542, 9125, 9725, 10348, 10987, 11651, 12329, 13024
Offset: 1
Links
- Alois P. Heinz, Table of n, a(n) for n = 1..1000
Programs
-
Maple
b:= proc(n) option remember; local m; m:= a(n); `if`(n=1, 0, b(n-1)); while m>0 do %+ irem(m, 10, 'm') od; % end: a:= proc(n) option remember; `if`(n=1, 2, a(n-1) +b(n-1)) end: seq(a(n), n=1..50); # Alois P. Heinz, Oct 07 2009