A156084 Sum of the squares of the first n Fibonacci numbers with index divisible by 3.
0, 4, 68, 1224, 21960, 394060, 7071116, 126886032, 2276877456, 40856908180, 733147469780, 13155797547864, 236071208391768, 4236125953503964, 76014195954679580, 1364019401230728480, 24476335026198433056, 439210011070341066532
Offset: 0
Links
- Index entries for linear recurrences with constant coefficients, signature (17,17,-1).
Programs
-
Mathematica
a[n_Integer] := If[ n >= 0, Sum[ Fibonacci[3k]^2, {k, 1, n} ], -Sum[ Fibonacci[-3k]^2, {k, 1, -n - 1} ] ]
Formula
a(n) = sum_{k=1..n} F(3k)^2.
Closed form: a(n) = L(6n+3)/20 - (-1)^n/5.
Factored closed form: a(n) = (1/4) F(n) F(n+1) (L(n) - 1)(L(n) + 1)(L(2n+2) - 1) if n is even; a(n) = (1/4) F(n) F(n+1) (L(n+1) - 1)(L(n+1) + 1)(L(2n) - 1) if n is odd.
Recurrence: a(n) - 17 a(n-1) - 17 a(n-2) + a(n-3) = 0.
G.f.: A(x) = 4 x/(1 - 17 x - 17 x^2 + x^3) = 4 x/((1 + x)(1 - 18 x + x^2)).
a(n) = 4*A156085(n). - R. J. Mathar, Aug 06 2019
Comments