A152232 Similar to A072921 but starting with 3.
3, 6, 15, 30, 48, 78, 123, 174, 237, 312, 393, 489, 606, 735, 879, 1047, 1227, 1419, 1626, 1848, 2091, 2346, 2616, 2901, 3198, 3516, 3849, 4206, 4575, 4965, 5379, 5817, 6276, 6756, 7260, 7779, 8328, 8898, 9501, 10119, 10749, 11400, 12057, 12729, 13422
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, 3, a(n-1) +b(n-1)) end: seq(a(n), n=1..50); # Alois P. Heinz, Oct 07 2009