A152233 Similar to A072921 but starting with 4.

4, 8, 20, 34, 55, 86, 131, 181, 241, 308, 386, 481, 589, 719, 866, 1033, 1207, 1391, 1589, 1810, 2041, 2279, 2537, 2812, 3100, 3392, 3701, 4021, 4348, 4694, 5063, 5446, 5848, 6275, 6722, 7186, 7672, 8180, 8705, 9250, 9811, 10391, 10985, 11602, 12229

Offset: 1

Author

N. J. A. Sloane, Oct 07 2009

Keywords

• nonn
• base
• easy

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, 4, a(n-1) +b(n-1)) end: seq(a(n), n=1..50);  # Alois P. Heinz, Oct 07 2009