cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A217471 Partial sum of fifth power of the even-indexed Fibonacci numbers.

This page as a plain text file.
%I A217471 #29 Jun 30 2025 16:17:56
%S A217471 0,1,244,33012,4117113,507401488,62424765712,7678070811369,
%T A217471 944346243245076,116147016764564500,14285140634333292625,
%U A217471 1756956185432949082176,216091326285380812359744,26577476188001703626949937
%N A217471 Partial sum of fifth power of the even-indexed Fibonacci numbers.
%C A217471 For the o.g.f. for general powers of Fibonacci numbers F=A000045 see A056588 (row polynomials as numerators) and  A055870 (row polynomials as denominator). The even part of the bisection leads to the o.g.f. for powers of F(2*n), and the partial sums of these powers are then given by dividing this o.g.f. by (1-x). For the o.g.f.s for F(n)^5 and F(2*n)^5 see A056572 and A215044, respectively.
%C A217471 The tables of the coefficient of the polynomials which appear in Ozeki's formula and in Melham's conjecture are found in A217472 and A217475, respectively (see References).
%H A217471 G. C. Greubel, <a href="/A217471/b217471.txt">Table of n, a(n) for n = 0..475</a>
%H A217471 R. S. Melham, <a href="https://web.archive.org/web/2024*/https://www.fq.math.ca/Papers1/46_47-4/Melham.pdf">Some conjectures concerning sums of odd powers of Fibonacci and Lucas numbers</a>, The Fibonacci Quart. 46/47 (2008/2009), no. 4, 312-315.
%H A217471 K. Ozeki, <a href="https://web.archive.org/web/2024*/https://www.fq.math.ca/Papers1/46_47-2/Ozeki.pdf">On Melham's sum</a>, The Fibonacci Quart. 46/47 (2008/2009), no. 2, 107-110.
%H A217471 H. Prodinger, <a href="https://web.archive.org/web/2024*/https://www.fq.math.ca/Papers1/46_47-3/Prodinger.pdf">On a sum of Melham and its variants</a>, The Fibonacci Quart. 46/47 (2008/2009), no. 3, 207-215.
%F A217471 a(n) = Sum_{k=0..n} F(2*k)^5, n>=0.
%F A217471 O.g.f.: x*(1+99*x+416*x^2+99*x^3+x^4)/((1-3*x+x^2)*(1-18*x+x^2)*(1-123*x+x^2)*(1-x)).
%F A217471 a(n) = 2*(F(2*(n+1)) - F(2*n))/5 - F(3*(2*n+1))/20 +
%F A217471   (F(10*(n+1)) - F(10*n))/F(10)^2 - 7/22 (from the partial fraction decomposition of the o.g.f.).
%F A217471 a(n) = (1/11)*F(2*n+1)^5 - (15/44)*F(2*n+1)^3 + (25/44)*F(2*n+1) - 7/22 (from Ozeki reference, Theorem 2, p. 109 --- with a misprint -- and from Prodinger reference, p. 207).
%F A217471 a(n) =(F(2*n+1)-1)^2*(4*F(2*n+1)^3 + 8*F(2*n+1)^2 - 3*F(2*n+1) - 14)/44 (an example for Melham's conjecture, see the reference, eq. (2.7) for m=2).
%e A217471 a(2) = 244 = 2*(8-3)/5 - 610/20 + (832040-6765)/55^2 - 7/22.
%e A217471 a(2) = 244 = (1/11)*5^5 - (15/44)*5^3 + (25/44)*5 - 7/22.
%e A217471 a(2) = 244 = (5-1)^2*(4*5^3 + 8*5^2 - 3*5 - 14)/44
%e A217471            = (4*5^3 + 8*5^2 - 3*5 - 14)*(4/11).
%t A217471 Table[Sum[Fibonacci[2*k]^5, {k, 0, n}], {n, 0, 50}] (* _G. C. Greubel_, Apr 12 2017 *)
%t A217471 Accumulate[Fibonacci[Range[0,30,2]]^5] (* _Harvey P. Dale_, Jun 30 2025 *)
%o A217471 (PARI) a(n) = sum(k=1, n, fibonacci(2*k)^5); \\ _Michel Marcus_, Feb 29 2016
%Y A217471 Cf. A163198 (third powers).
%K A217471 nonn,easy
%O A217471 0,3
%A A217471 _Wolfdieter Lang_, Oct 11 2012