OFFSET
1,2
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..1000
Index entries for linear recurrences with constant coefficients, signature (6,-13,13,-6,1).
FORMULA
a(n) = Fibonacci(2*n+5) - 2*n^2 - 5*n - 5.
G.f.: x*(1+5*x-2*x^2)/((1-x)^3*(1-3*x+x^2)). - Colin Barker, Sep 20 2012
MAPLE
with(combinat): seq(fibonacci(2*n+5) -(2*n^2+5*n+5), n=1..40); # G. C. Greubel, Sep 28 2019
MATHEMATICA
CoefficientList[Series[(1+5x-2x^2)/((1-x)^3*(1-3x+x^2)), {x, 0, 40}], x] (* Vincenzo Librandi, Oct 18 2013 *)
LinearRecurrence[{6, -13, 13, -6, 1}, {1, 11, 51, 176, 530}, 40] (* Harvey P. Dale, Aug 18 2017 *)
PROG
(Magma) [Fibonacci(2*n+5)-2*n^2-5*n-5: n in [1..30]]; // Vincenzo Librandi, Apr 18 2011
(PARI) vector(40, n, fibonacci(2*n+5) -(2*n^2+5*n+5) ) \\ G. C. Greubel, Sep 28 2019
(Sage) [fibonacci(2*n+5) -(2*n^2+5*n+5) for n in (1..40)] # G. C. Greubel, Sep 28 2019
(GAP) List([1..40], n-> Fibonacci(2*n+5) -(2*n^2+5*n+5) ); # G. C. Greubel, Sep 28 2019
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
EXTENSIONS
More terms from Vincenzo Librandi, Oct 18 2013
STATUS
approved