OFFSET
0,2
LINKS
Reinhard Zumkeller, Table of n, a(n) for n = 0..10000
EXAMPLE
The terms that are <= 9 are a(0) through a(3). So a(9) = a(8) + a(0) + a(1) + a(2) + a(3) = 51 + 1 + 2 + 5 + 8 = 67.
MAPLE
a[0]:=1: for n from 1 to 60 do b:=0: for j from 0 to n-1 do if a[j]<=n then b:=b+a[j] else fi od: a[n]:=a[n-1]+b: od: seq(a[n], n=0..60); # Emeric Deutsch, Apr 12 2007
PROG
(Haskell)
a129300 n = a129300_list !! (n-1)
a129300_list = 1 : f [1] 1 where
f xs@(x:_) k = y : f (y:xs) (k+1) where
y = x + sum [z | z <- xs, z <= k]
-- Reinhard Zumkeller, Feb 09 2012
CROSSREFS
KEYWORD
nonn
AUTHOR
Leroy Quet, Apr 08 2007
EXTENSIONS
More terms from Emeric Deutsch, Apr 12 2007
STATUS
approved