|
|
A152233
|
|
Similar to A072921 but starting with 4.
|
|
1
|
|
|
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
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
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
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|