|
|
A059508
|
|
Transform of A059502 applied to sequence 5,6,7,...
|
|
2
|
|
|
5, 11, 29, 79, 216, 590, 1609, 4381, 11911, 32339, 87690, 237496, 642509, 1736399, 4688081, 12645655, 34080924, 91775426, 246948241, 663999649, 1784138875, 4790751131, 12856028814, 34478744044, 92416515221
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
The fifth row of the array A059503.
|
|
LINKS
|
|
|
FORMULA
|
a(n) = 6*a(n-1) - 11*a(n-2) + 6*a(n-3) - a(n-4).
G.f.: x*(1-x)*(4*x^2-14*x+5)/(x^2-3*x+1)^2. (End)
a(n) = ((3 - n)*Fibonacci(2*n) + (20 + 3*n)*Fibonacci(2*n - 1))/5. - G. C. Greubel, Sep 10 2017
|
|
MATHEMATICA
|
Rest[CoefficientList[Series[x*(1-x)*(4*x^2 - 14*x + 5)/(x^2 - 3*x + 1)^2, {x, 0, 50}], x]] (* G. C. Greubel, Sep 10 2017 *)
|
|
PROG
|
(PARI) Vec(-x*(x-1)*(4*x^2-14*x+5)/(x^2-3*x+1)^2 + O(x^40)) \\ Michel Marcus, Sep 09 2017
|
|
CROSSREFS
|
|
|
KEYWORD
|
easy,nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|