OFFSET
1,2
EXAMPLE
a(7) = a(6) + 6 + the number of a(k)'s <= 6 = 24 + 6 + 3 ( a(3) is <= 6) = 33.
MATHEMATICA
f[1] = 1; f[n_] := f[n] = Block[ {k = 1}, While[ f[k] < n, k++ ]; k--; Return[ f[n - 1] + (n - 1) + k]]; Table[ f[n], {n, 1, 60} ]
CROSSREFS
KEYWORD
nonn
AUTHOR
Robert G. Wilson v, Nov 25 2001
STATUS
approved