OFFSET
0,2
COMMENTS
if c = 0.3549412150654756947265447261312365125932387..., then a(n) =~ floor(c*10^n). This holds to n^7 +- 2.
LINKS
Charles R Greathouse IV and Robert G. Wilson v, Table of n, a(n) for n = 0..1000
MATHEMATICA
a[0] = 0; a[1] = 1; a[n_] := a[n] = Block[{p = 2^(Ceiling[Log[2, n]] - 1)}, a[p] + a[n - 1 - p]];
Table[a[10^n], {n, 0, 20}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Charles R Greathouse IV and Robert G. Wilson v, Sep 20 2014
STATUS
approved