OFFSET
-3,6
LINKS
G. C. Greubel, Table of n, a(n) for n = -3..1000
Index entries for linear recurrences with constant coefficients, signature (1,2,2,1).
FORMULA
a(n) = Sum_{k, 0<=k<=[n/2]} A016095(n-k,k).
G.f.: 1/(1-x-2*x^2-2*x^3-x^4).
a(n) = Sum_{k=0..n} C(n-k,k)*F(n-k+1). - Paul Barry, Mar 01 2010
MATHEMATICA
Join[{0, 0, 0}, CoefficientList[Series[1/(1 - x - 2*x^2 - 2*x^3 - x^4), {x, 0, 50}], x]] (* or *) Join[{0, 0, 0}, Table[Sum[ Binomial[n - k, k]*Fibonacci[n - k + 1], {k, 0, n}], {n, 0, 50}]] (* G. C. Greubel, Oct 13 2017 *)
LinearRecurrence[{1, 2, 2, 1}, {0, 0, 0, 1}, 40] (* Harvey P. Dale, Mar 01 2018 *)
PROG
(PARI) x='x+O('x^50); concat([0, 0, 0], Vec(1/(1-x-2*x^2-2*x^3-x^4))) \\ G. C. Greubel, Oct 13 2017
CROSSREFS
KEYWORD
nonn
AUTHOR
Philippe Deléham, Oct 14 2006
STATUS
approved