Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
A059507
Transform of A059502 applied to sequence 4,5,6,...
2
4, 9, 24, 66, 182, 501, 1376, 3771, 10314, 28158, 76744, 208839, 567484, 1539981, 4173852, 11299386, 30556346, 82547961, 222790424, 600753663, 1618558734, 4357256694, 11721125644, 31507528971, 84637773172
OFFSET
1,1
COMMENTS
The fourth row of the array A059503.
FORMULA
From Colin Barker, Nov 30 2012: (Start)
a(n) = 6*a(n-1) - 11*a(n-2) + 6*a(n-3) - a(n-4).
G.f.: x*(1-x)*(3*x^2-11*x+4)/(x^2-3*x+1)^2. (End)
a(n) = ((3 - n)*Fibonacci(2*n) + (15 + 3*n)*Fibonacci(2*n - 1))/5. - G. C. Greubel, Sep 10 2017
MATHEMATICA
Rest[CoefficientList[Series[x*(1 - x)*(3*x^2 - 11*x + 4)/(x^2 - 3*x + 1)^2, {x, 0, 50}], x]] (* G. C. Greubel, Sep 10 2017 *)
PROG
(PARI) Vec(x*(1-x)*(3*x^2-11*x+4)/(x^2-3*x+1)^2 + O(x^40)) \\ Michel Marcus, Sep 09 2017
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Floor van Lamoen, Jan 19 2001
STATUS
approved