OFFSET
1,2
EXAMPLE
There are four terms (1,2,4,7) of the sequence which are <= 9. So a(9) = a(8) + 4 = 25.
MATHEMATICA
f[l_] := Block[{s = Length@l + 2}, Append[l, Last@l + Length@Select[l, # < s &]]]; Nest[f, {1}, 56] (* Robert G. Wilson v, Mar 01 2007 *)
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Leroy Quet, Feb 27 2007
EXTENSIONS
More terms from Robert G. Wilson v, Mar 01 2007
STATUS
approved