OFFSET
0,3
LINKS
Alois P. Heinz, Table of n, a(n) for n = 0..2000
FORMULA
a(n) = Sum_{k=0..n/2} A000045(n-2*k+1)*a(k). - R. J. Mathar, Apr 02 2010
G.f.: Product_{k>=0} 1/(1 - x^(2^k) - x^(2^(k + 1))). - Ilya Gutkovskiy, Aug 30 2017
a(n) ~ c * phi^(n+1) / sqrt(5), where c = Product_{k>=1} 1/(1 - x^(2^k) - x^(2^(k+1))) = 2.6009165618094467356830434687244547021995030468423430186926... and phi = A001622 is the golden ratio. - Vaclav Kotesovec, Oct 08 2022
MAPLE
A173285 := proc(n) option remember; if n = 0 then 1; else add(procname(l)*combinat[fibonacci](n-2*l+1), l=0..n/2) ; end if; end proc:
seq(A173285(n), n=0..60) ; # R. J. Mathar, Apr 01 2010
MATHEMATICA
a[n_] := a[n] = If[n == 0, 1, Sum[Fibonacci[n-2k+1] a[k], {k, 0, n/2}]];
a /@ Range[0, 40] (* Jean-François Alcover, Oct 02 2019 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Gary W. Adamson, Feb 14 2010
EXTENSIONS
Division through x added to definition and sequence extended by R. J. Mathar, Apr 22 2010
STATUS
approved