A372015 Product of Fibonacci and self-convolution of Fibonacci numbers: a(n) = A000045(n+1)*A001629(n+1).

0, 1, 4, 15, 50, 160, 494, 1491, 4420, 12925, 37380, 107136, 304764, 861445, 2421700, 6775755, 18879734, 52413856, 145038890, 400183575, 1101277060, 3023462521, 8282790024, 22646131200, 61805595000, 168399404425, 458128878724, 1244567262471, 3376576740410, 9149594423200

Offset

0,3

Links

Table of n, a(n) for n=0..29.

Index entries for linear recurrences with constant coefficients, signature (5,-5,-5,5,-1).

Formula

a(n) = F(n+1)*((n+2)*F(n) + (n)*F(n+2))/5 where F(n) = A000045(n) is the Fibonacci numbers.

G.f.: x*(1-x)/((1+x)*(1-3*x+x^2)^2).

Maple

a := proc(n) option remember; if n < 3 then return n^2 fi;
-((2 - 2*n^2 + n)*a(n - 1) + (1 - 2*n^2 + 3*n)*a(n - 2) + n^2*a(n - 3))/(n - 1)^2 end: seq(a(n), n = 0..29);  # Peter Luschny, Apr 16 2024

Mathematica

CoefficientList[Series[x(1-x)/((1+x)*(1-3*x+x^2)^2), {x, 0, 29}], x] (* Stefano Spezia, Apr 16 2024 *)

Crossrefs

Cf. A000045, A001629.

Sequence in context: A143215 A301973 A132308 * A026110 A056327 A026328

Adjacent sequences: A372012 A372013 A372014 * A372016 A372017 A372018

Keyword

nonn,easy

Author

Vladimir Kruchinin, Apr 15 2024

Status

approved